Question

Помогите решить задачу по Pascal
Вычислить и вывести на печать значение функции(картинка внизу) . Исходные данные X, A и B ввести с клавиатуры.

Answer 1

var
x, a, b: Integer; y: Real;
begin
//writeln(x,a,b);
ReadLn(x);
ReadLn(a);
ReadLn(b);
y:= tg*x*exp(ln(a)*(b+1))*ln(a+b);
WriteLn('Otvet y = 'y);

Answer 2

Спасибо огромное!