Составить программу в pascal abc. найдите максимальное среди введеных 4 чисел. зарание

293

391

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

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

12320071

Информатика

4,4(57 оценок)

Var a,b,c,d,max: integer; begin max: =-100000; readln(a); if max< a then max: =a; readln(b); if max< b then max: =b; readln(c); if max< c then max: =c; readln(d); if max< d then max: =d; writeln(max); end.

Физик5765

Информатика

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

4- не уверен. вообще информацией для вас является любое сообщение, которое до момента его получения, было вам не знакомо. 5 - d 6 - d 7 - d 8 - b 9 - a 10 - d 11 - c 12 - d 13 - d 14 - a 15 - c 16 - a 17 - d