program cnden;
uses crt;
var a,b:integer;
begin
clrscr;
readln(a,b);
if a>b then writeln(a) else writeln(b);
readln;
end.
Блок-схему сама, мне лень рисовать
