Предмет: Информатика,
автор: 4004401
help
Написать в тетради программу pascal, которая определяет наибольшее из семи чисел(числа вводятся пользователям во время работы программы)
Ответы
Автор ответа:
1
ответ ниже в комментарии\
Похожие вопросы
Предмет: Другие предметы,
автор: yanakazakova54
Предмет: Алгебра,
автор: dianamamatkulova003
Предмет: Химия,
автор: joodarbekova
Предмет: Математика,
автор: LordWolrd
Предмет: Математика,
автор: Ангелина200321
var
i, a, max: integer;
begin
read (a);
max:=a;
for i:=1 to 6 do
begin
read(a);
if a>max then max:=a;
end;
write('max - ',max);
end.