Предмет: Информатика,
автор: apozhidaeva00ad2014
написать программу нахождения максимального из пяти значений. Паскаль
defendercryak:
можно использовать массив?
Ответы
Автор ответа:
0
Ответ:
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.
Интересные вопросы
Предмет: Геометрия,
автор: titarevcaca54
Предмет: Математика,
автор: vlasovaanna20123008
Предмет: Информатика,
автор: Ihoriop
Предмет: Информатика,
автор: SuperWendy
Предмет: Алгебра,
автор: sashaabrosimov