Написать программу, которая определяет максимальное число из введенной с клавиатуры последовательности положительных чисел (длина последовательности не ограничена)

Программа Паскаль

Цикл с пост условием

Question

Информатика

Сильвана

22 августа, 12:47

Написать программу, которая определяет максимальное число из введенной с клавиатуры последовательности положительных чисел (длина последовательности не ограничена)

Программа Паскаль

Цикл с пост условием

+1

Ответы (1)

Знаете ответ?

Оза · Answer 1

Program test;

var max, n:integer;

max:=0;

while n0 do / / по окончанию ввода последовательности надо поставить '0'

begin

if max
end;

writeln (max) ;

end.