Склавиатуры вводятся производные числа a и b. вывести на экран большее из них.

Var a,b:longint;
begin     
        readln(a,b);     
        If a>b then writeln(a)
                 else writeln(b);
end.