Дано 2 числа найти большее из них. В ДЕЛФИ

Var a, b: Integer;beginReadLn(a, b);if a>b then WriteLn(a)else WriteLn(b);end.-------------------------Это если консольное. Если графическое приложение - тогда приношу свои извинения.