ОляRu

09.05.2021 15:02

Есть ответ 👍

Всистеме программирования pascal abc выполните проверяемое cif2 для исполнителя робот (закрасить клетки, у которых сверху или снизу есть стена) (рис. 3.46). положение стен и длина коридора могут быть различными

106

200

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

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

RocketBubbleGum007

Информатика

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

{pascalabc}

program puzzle;

var

r,day: integer;

week: array[1..7] of string;

i: integer;

s: string;

begin

week[7]: ='воскресенье';

week[6]: ='суббота';

week[5]: ='пятница';

week[4]: ='четверг';

week[3]: ='среда';

week[2]: ='вторник';

week[1]: ='понедельник';

s: ='**** -=alphaeus=- ****';

for i: =1 to 22 do begin write(s[i]); sleep(200) end;

writeln; writeln('ок, задумайте день недели (номер от 1 до 7)');

writeln('удвойте этот номер');

writeln('увеличьте результат на 5');

writeln('умножьте полученное число на 5');

writeln('теперь то, что получилось, умножьте на 10');

writeln('введите полученный результат'); readln(r);

day: = round((r-250)/100);

writeln('**************************************');

case day of

1..7: writeln(' вы задумали ',week[day]);

else writeln('что-то пошло не либо вы задумали не число между 1 и 7, либо ошиблись в рассчётах')

end;

writeln('**************************************');

end.

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

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

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

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

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

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