(Сама функция прикреплена в эскизе изображения)
Я вычисление функции составила так (по действиям). Мне кажется, что неправильно. Подскажите, пожалуйста!
................
................
Writeln('Вычисление значения многопараметрической функции F:');
Write(' Введите х= ');
Readln(x);
c:=exp(2*x);
y:=((sin(x-1))/cos(x-1));
p:=((sin(A*x)*sin(A*x))+B);
t:=c+y;
F:=t/p;
Writeln(' Числитель = ',t:4:2);
Writeln(' Знаменатель = ',p:4:2);
Writeln(' Функция F = ',F:4:2);
Readln;
End.