var
n, max: real;
i: integer;
begin
Read(n);
max := n;
for i:=1 to 4 do
if n > max then
max := n
end;
Write(max)
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var
n, max: real;
i: integer;
begin
Read(n);
max := n;
for i:=1 to 4 do
begin
Read(n);
if n > max then
max := n
end;
Write(max)
end.