СРОЧНО!!! :(
Составьте программу, определяющую максимальное из всех вводимых вами чисел. Концом ввода чисел является введенное число 0.

Есть ответ
17.12.2022
293

Ответ


Program Pr1;uses crt;var max,a:integer;Beginclrscr;max:=0;a:=1;while a0 do begin readln(a); if a>max then max:=a; end;writeln(max);end.


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.