nike1110
01.11.2021 05:20

Написать программу нахождения максимального из пяти значений. паскаль

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
m1m2m3m4m571
10.10.2020 18:40

var i,a,max:integer;

begin

max:=0;

for i:=1 to 5 do begin

read(a);

if (a>max) or (max=0) then max:=a;

end;

writeln;

write(max);

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота