Предмет: Информатика,
автор: nastyush2598
Написать программу, которая определяет максимальное число из введенной с клавиатуры последовательности положительных чисел ( длина последовательности не ограничена)
Программа Паскаль
Цикл с пост условием
Ответы
Автор ответа:
0
program test;
var max,n:integer;
max:=0;
while n<>0 do// по окончанию ввода последовательности надо поставить '0'
begin
if max<n then max:=n;
end;
writeln(max);
end.
var max,n:integer;
max:=0;
while n<>0 do// по окончанию ввода последовательности надо поставить '0'
begin
if max<n then max:=n;
end;
writeln(max);
end.
Похожие вопросы
Предмет: Физика,
автор: sabinadmit920
Предмет: Математика,
автор: isaevmuhabbat
Предмет: Русский язык,
автор: marialongortova03
Предмет: Алгебра,
автор: rhdhdfh
Предмет: Математика,
автор: derbakova77