Program bai1;
uses crt;
var a,b: real;
begin
clrscr;
write('nhap so a ='); readln(a);
write('nhap so b ='); readln(b);
if a > b then writeln('a lon hon b');
if a < b then writeln('a nho hon b');
if a = b then writeln('a bang b ');
readln;
end.