Друзья, решить эти две по программированию в pascal abc. нужно, буду вам признателен.если что, я написал подпрограмму для рисования одного домика, а как делать их интервале я без понятия, если честно.вот она: program smr1; uses graphabc; var n: integer; procedure domik; beginrectangle(20,30,60,60); circle(40,22,4); fillrect(30,40,50,50); rectangle(30,40,50,50); line(40,40,40,50); line(30,45,50,45); line(20,30,40,15); line(40,15,60,30); end; begin{а здесь должны быть вот эти интервалы от 1 до 10, пока я не достиг понимания, как их писать, }end.я много , , надо.

299

441

Посмотреть ответы 1

Ответы на вопрос:

Nika7854

Информатика

4,8(6 оценок)

Var a,n,i: byte; mn: set of byte; begin readln(n); mn: =[]; writeln('числа последовательности: '); for i: =1 to n do begin a: =random(256); write(a,' '); mn: =mn+[a]; end; writeln; writeln('числа, которые не входят в последовательность: '); for i: =0 to 255 do if not (i in mn) then write(i,' '); writeln; end. пример (для диапазона от 0 до 25): числа последовательности: 6 23 17 12 17 4 22 25 3 8числа, которые не входят в последовательность: 0 1 2 5 7 9 10 11 13 14 15 16 18 19 20 21 24

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.