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

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

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

Question

Информатика

Галиха

29 ноября, 19:16

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

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

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

+4

Ответы (1)

Знаете ответ на вопрос?

Ананий · Answer 1

Program test;

var max, n:integer;

max:=0;

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

begin

if max
end;

writeln (max) ;

end.