Добрый день , вечер. Уважаемые форумчане.
Требуется Ваша помощь по решению алгоритма с ветвями.
Текст алгоритма:

PROGRAM Lab;
CONST
C=8.338;
VAR
A,B,F,R :real;
BEGIN
Writeln('A:=11.1,B:=0.87');
Readln(A,B);
R:=A/B;
if (R>C) and (abs(B)>0.1) then
F:= ln®-A/C(B)
else
if (R<=C) and (abs(B)>0.1) then
F:= exp®+C(B)
else
F:= C(B);
Writeln('Рез-т' ,F:);
END.

*Ошибки начинаются с 11 строки, но понять в чём именно проблема - не могу.
Прикрепил файл изображения с заданием.

P.S: "Программу только начали изучать, многое не понятно.
Надеюсь на Вашу профессиональную помощь. Спасибо.

Выглядит так, будто ( R ) после набора в каком-то «умном» чате или редакторе автоматом преобразовались в ®

Добавлено. Оказывается, форум IPB именно такой «умный». А других проблем нет?

Здравствуйте. Да, действительно, R каким-то чудом преобразовалось при копировании алгоритма, но не в этом проблема.

Вот "список" проблемы при запуске алгоритма:

Error(s):
source.pas(11,14) Fatal: Syntax error, ";" expected but "(" found
Error: /usr/bin/ppcx64 returned an error exitcode.

В 11й строке C вызывается как приведение типа или вызов функции, но C — это константа. Там имелось в виду что-то другое.

Посмотрите вложение с заданием. Разве С не должно быть равно 8.338?

C(B)

Такой синтаксис используется либо для приведения выражения B к типу C, либо для вызова функции C с единственным аргументом B. Но C — не имя типа и не функция. Если C должно быть константой, значит, ошибка в самом выражении C(B).

Вот как.
Спасибо за наводку.

Решено.

Тему можно закрывать.

Отдельное спасибо OCTOGRAM(у).