Пишет ошибку 122

Пишет ошибку 122
Задание написать какое из чисел больше не используя дополнительной сменной
Program Task_1;
var A,B,C:longint;
Begin
Write ('enter A');
Readln (a)
Write ('enter B');
Readln (b)
Write ('enter C');
Readln (c)
If (A>B) Then (A>C) Then
Write(:=A) or Write (:=C)
Else (B>C) then Write (:= B) or Write (:=C);
End.

  • Да тут полнейшая ж ересь у тебя, еще б он не ругался...
  • Значение ошибки 122
    Недействительная ссылка на переменную

    Тип ошибки 122
    Ошибка компилятора Turbo Pascal

    Описание ошибки 122
    Предыдущая конструкция удовлетворяет синтаксису ссылки на переменную, но она не указывает адрес памяти. Возможно Вы вызываете функцию-указатель, но забываете сослаться на результат с помощью знака.