Дано дейсвительное число Х. Вычислить х-(x^3)/3!+(x^5)/5!-(x^7)/7!+(x^9)/9!-(x^11)/11!+(x^13)/13!

INPUT"vvedite x ",x
FOR i=1 TO 7
f=1
FOR j=1 TO i*2-1
f=f*j
NEXT
s=s+(-1^(i-1))*x^(i*2-1)/f
NEXT
PRINT s

автор: кот Бегемот