Входные данные

Даны два целых числа, каждое число записано в отдельной строке.


Выходные данные

Выведите наибольшее из данных чисел.
1
2
язык паскаль

var  

 a, b: integer;

begin

readln(a, b);

if a >b then

 writeln(a)

else  

 writeln(b);

end.