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

program abs; var a,b: integer; beginwriteln ('Введите 1-е двухзначное число'); readln (a); writeln ('Введите 2-е двухзначное число'); readln (b); if a>b then writeln ('первое число больше') else writeln ('второе число больше'); end.