Определить максимальную температуру на неделе , если температура за неделю вводится с клавиатуры !
Ответы
Ответ дал:
0
var i,max,k:integer;
begin
max:=-100;
for i:=1 to 7 do begin readln(k); if k>max then max:=k; end;
writeln(max);
end.
Похожие вопросы
2 года назад
2 года назад
8 лет назад
9 лет назад