uses crt;
var a, b : integer;
begin
clrscr;
write('Nhap hai so a, b : '); readln(a, b);
if a = b then write('Hai so bang nhau');
if (a > b) and (a <> b) then
write('Thu tu khong giam : ', b : 3, a : 3);
if (a < b) and (a <> b) then
write('Thu tu khong giam : ', a : 3, b : 3);
readln
end.