Ответ:
var

 a, b: integer;

begin

 write('Введите первое число: ');

 readln(a);

 write('Введите второе число: ');

 readln(b);

 if a > b then

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

 else if b > a then

   writeln('Второе число больше первого')

 else

   writeln('Первое число равно второму');

end.

Объяснение:При выполнении программы пользователь должен будет ввести два числа, а затем программа сравнит их и выдаст соответствующий ответ.