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

йцукен56 йцукен56    2   20.07.2019 01:10    0

Ответы
roman81rudi roman81rudi  03.10.2020 08:25
Var a, max: integer;
begin
read(a);
max:=a;
repeat 
read(a);
If a>max then max:=a;
until a<>0;
writeln(max);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика