Написать программу сравнивающую два введённых с клавиатуры числа. Результатом должно быть одно из сообщений: "первое число больше", или "второе число больше", или "числа равны".​

program xxx;

var

a,b:integer;

begin

writeln('Введите два целых числа...');

Readln(a,b);

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

if (a<b) then writeln('Второе число больше первого');

if (a=b) then writeln('Числа равны');

end.