Pascal :

 var a,b:integer;
 begin
 readln(a,b);
 if a>b  then writeln(a) else writeln(b);
 end.