Помогите создать программу паскаль для задачки:Даны два разных вещественных

// PascalABC.NET 3.3, сборка 1573 от 04.11.2017
// Внимание! Если программка не работает, обновите версию!

a)

begin
  var (a,b):=ReadReal2('Введите через пробел два числа:');
  if agt;b then Writeln('1-ое число больше второго')
  else
    if bgt;a then Writeln('Второе число больше первого')
    else Writeln('Числа равны')
end.

b)

begin
  var (a,b):=ReadReal2('Введите через пробел два числа:');
  if alt;b then Writeln('Первое число меньше второго')
  else
    if blt;a then Writeln('Второе число меньше первого')
    else Writeln('Числа одинаковы')
end.