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

Program Numbers; var a, b:integer; begin write ('Введите числа'); read (a,b); if a>b then write (a) else write(b); end.