Дано натуральное n и действительное x. Вычислить: ((1/2) - cos(x))*((2/3) - cos^2(x))*...*((n/n+1) - cos^n(x))

Результат вывести на печать.

INPUT "vvedite N ",n
INPUT "vvedite x ",x
p=1
FOR i=1 TO n
p=p*(i/(i+1)-COS(x)^i)
NEXT
PRINT p

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