Добрый день! Помогите пожалуйста разобраться с примером, вот сама функция:
.
В Паскале у меня получилась она так:

Program funkciya;
Uses crt;
Var
y,a,b,x:real;
Begin
clrscr;
writeln ('vvedite a=');
readln (a);
writeln ('vvedite b=');
readln (b);
writeln ('vvedite x=');
readln (x);
y:=(sqr(cos(x*x*x))-(x/(sqrt(sqr(a))+(sqr(b)))))*arctan(x/sqrt(1-sqr(x)));
writeln ('y',y:7:2);
readkey;
End.

Но после того как я нажимаю Ctrl+F9 ввожу данные a,b,x, то Паскаль мне выдаёт ошибку: Error 207: Invalid floating point operation , ну если я меняю writeln ('y',y:7:2) на writeln (y) , то выдаёт: Error 200: Division by zero.