Есть ответ 👍

Напишите программу, в которой осуществляется ввод целых чисел (ввод осуществляется пока не будет введен ноль) и определение максимального ( наибольшего) из введенных чисел. используйте оператор repeat.

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

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


Var   max, n: integer;   i: integer; begin   i: =0;   repeat     readln(n);           if i = 0 then       max: =n     else if n > max then       max: =n;     inc(n);   until(n = 0);     writeln('max =  ', max); end.
NasFan
4,8(80 оценок)

Объяснение:

9+9+2=20

14=9+9-2-2

Думаю так

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