На числовой прямой даны две точки a и b. сообщить на экран какая из них правее.

Вот так выглядит программа:

program Tochki;

var
  a, b: integer;

begin
  write('введите 2 числа: ');
  readln(a, b);
  if a < b
    then writeln('Правее точка b')
  else writeln('Правее точка a');
end.