Даны 2 двухзначных числа сравнить какое число наибоьшее по паскалю

program abs;

var a,b:integer;

begin

writeln('Введите 1-е двухзначное число');

readln(a);

writeln('Введите 2-е двухзначное число');

readln(b);

if a>b then writeln ('первое число больше')

else writeln('второе число больше');

end.