Var a,i,max:integer;
begin
max:=-30000;
for i:=1 to 5 do begin
readln(a);
if a>max then max:=a;
end;
writeln('Максимальное - ', max);
end.
Ответ:
324
Объяснение:
Каждый раз подставлять нодо прошлый у
<span>информация,
представленная в формализованном виде, что обеспечивает возможность ее
хранения, обработки и передачи. </span>