Предмет: Информатика, автор: markvajsner

Определить максимальную температуру на неделе , если температура за неделю вводится с клавиатуры !

Ответы

Автор ответа: daniilkey
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.

Похожие вопросы
Предмет: Математика, автор: provorkinanast