program so_lon;
uses crt;
var n,m:integer;
begin
clrscr;
write('Nhap so thu nhat: '); readln(n);
write('Nhap so thu hai: '); readln(m);
if m=n then write('Hai so bang nhau')
else if n>m then write('So thu nhat lon hon')
else write('So thu hai lon hon');
readln;
end.