Program ab;
Uses crt;
Var a,b  max: integer;
Begin
         clrscl;
         write('nhap a =');
         readln(a);
         write('nhap b =');
         readln(b);
         a:=max;
         if max<b then max :=b;
         write('so lon nhat la',max);
         readln;
End.