program dz;
Var
a,b:real;
begin
a:= 1.14085;
b:= 2.1327;
If a>b then write (a);
If b>a then write (b);
end.
program dz;
Var
a,b:real;
begin
a:= 1.14085;
b:= 2.1327;
If a>b then write (a);
If b>a then write (b);
end.