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

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