Составить программу вычисления велечины Y(x)

@xamelione25 · Регистрация: 04.02.2013

Author24 — интернет-сервис помощи студентам

составить программу вычисления велечины Y(x)
y=((sin((abs(x))/2))+(3^(1/(x-1))))/((sqrt((x^4)-16))^(1/6))*(sqrt(1-ln(x)))
я сделал но у меня выбивает 121 ошибку

Delphi

program F1;
 var x,y:real;
  begin
 read(x);
y:=((sin((abs(x))/2))+(3^(1/(x-1))))/((sqrt((x^4)-16))^(1/6))*(sqrt(1-ln(x)));
 write(y);
end.

@Andrys74 · 06.02.2013, 08:34

Что за значок "^" ???
На сколько я помню степени в делфи нет (или может я устарел и она появилась?)
Для возведения в степень, используем Exp(y*ln(x)), получим X^Y

@xamelione25 · 06.02.2013, 16:58 **[ТС]**

я исправил выше написанные ошибки

Pascal

program F1;
var x,y:real;
begin
read(x);
y:=((Sqr(Sin((Abs(x))/2)))+(Exp((1/(x-1))*Ln(3))))/(Exp((1/6)*Ln((Exp(4*Ln(x)))-16)))*(Exp((1/2)*Ln(1-Ln(x))));
write(y);
end.

но у меня теперь другая проблема: у меня теперь 207ю ошибку выбивает

Добавлено через 1 минуту
и я не в делфи,-я в турбо паскале (это лаба по информатике)

@Andrys74 217 / 81 / 6 Регистрация: 23.04.2012 Сообщений: 340
	06.02.2013, 08:34	2
	Что за значок "^" ??? На сколько я помню степени в делфи нет (или может я устарел и она появилась?) Для возведения в степень, используем Exp(y*ln(x)), получим X^Y 1

	06.02.2013, 16:58

Составить программу вычисления велечины Y(x)

Решение