Pascal ABC
var a,b,min:integer;
begin
readln(a);
read(b);
min:=0;
if a>b then
min:=a
else
min:=b;
write(min)
end.
Pascal ABC
var a,b,min:integer;
begin
readln(a);
read(b);
min:=0;
if a>b then
min:=a
else
min:=b;
write(min)
end.