Составить программу вычисления функции?

Question

[IndusDev]

Вот такая задачка.
Само вычисление записал в виде данной строки:
z:=(exp(x*x)/x)+(sqn(4*x)/sin(x)))));
Для некоторых значений, например 35 выводит "Не число".

Попробовал решить это таким путем:

write('Введите x: ');
  read(x);
  while ((sqrt(((ln(4*x)(((sqrt(sqrt((ln(4*x)/sin(x)))))) < 0)  or (x = 0)) do
    beginите x повторно: ');
      read(x);
    end;

(Не ругайте за огромное нагромождение и говнокод).
Что не так :(

Comments

[Сергей Сергей]

это Переполнение!, нужно ограничивать входные данные или ловить ошибки.

Answer 1

[Rsa97]

Да, собственно, во втором слагаемом всё не так, да и области определения функции неправильно заданы.

Comments

[Rsa97]

IndusDev, Смотрю, лишний логарифм уже убрали.
Значит теперь вы всего лишь берёте корень четвёртой степени вместо кубического.
А про области определения функций почитайте алгебру за 9 класс.

[Roman]

z:=(exp(x*x)/x)+(sqrt(sqrt((ln(4*x)/sin(x)))));

Разбейте на несколько выражений.