Тригонометрия! F1!

[Vano48rus]

sin (x^2)/2 - sin (x^4) + (-1^(n-1))*sin(x^2n)/n+1

х и n вводятся с клавиатуры. Помогите, пожалуйсто!

[Хыиуду]

flag:=ord(odd(n-1))*2-1;
либо
flag:=(n mod 2)*2-1;
// Это такой хитрый способ сказать "если n-1 нечетное, то flag=-1, а если четное, то 1"
sin (sqr(x))/2 - sin (sqr(sqr(x))) + flag*sin(exp(2*n*ln(x)))/n+1;
Для отрицательного x не сработает exp(2n*ln(x)), придется заменять это на for i:=1 to 2*n do s:=s*x;

[Vano48rus]

Спасибо огромное!!! Если не совсем влом накатай как это всё "Оформить"

[Хыиуду]

Влом. Все переменные типа real. Ввод переменных - это азы и основы. Читай учебник.

[Vano48rus]

спасибо! допёрло..

[Vano48rus]

Мля, препод орёт не тем способом решил! Кто напишет прогу полностью, кидайте ссылку вконтакте, надарю пива).. или на мобилу 100р..

[Хыиуду]

Я всю жизнь решаю все не тем способом, и все работает. И мне обычно пофигу, что там у препода в книжечке написано.
Что ему в этом способе не нравится? Сейчас еще какой-нибудь придумаю.