программа №4program str999; uses crt; var s: string; begin writeln('введіте фразу'); read(s); if (s='край озер') then writeln ('край озер лесов и рек'); if (s='я учусь в школе') then writeln ('я учусь в 10-м классе') end.
№5program p_1; uses crt; var s: string; begin writeln('введите фразу'); read(s); if (s='моя родина беларусь') then writeln ('беларусь моя родина'); if (s='люблю цябе мой родны кут') then writeln ('мой родны кут люблю цябе') end.
Ответ дал: Гость
1 input a
2 input b
3 input c
20 if a> b then goto 60
30 if b> c then goto 110
40 max=с
50 goto 120
60 if a> c then goto 90
70 max=с
80 goto 120
90 max=a
100 goto 120
110 max=b
120 if a< b then goto 160
130 if b< c then goto 210
140 min=с
150 goto 220
160 if a< c then goto 190
170 min=с
180 goto 220
190 min=a
200 goto 220
210 min=b
220 print min*max
Другие вопросы по: Информатика
Похожие вопросы
Знаешь правильный ответ?
Автомеханик ремонтирует автомобиль. тип исполнителя —...
Популярные вопросы