INPUT "vvedite N=", n
a = 32
b = 6
y = 1
FOR i = 1 TO n
a = a / 2
b = b + 2
y = y * (2 / a + (-1) ^ (i + 1) * b)
NEXT
PRINT "y="; y
Тестирование выполнено в программе QB64 ( Скачать )
INPUT "vvedite N=", n
a = 32
b = 6
y = 1
FOR i = 1 TO n
a = a / 2
b = b + 2
y = y * (2 / a + (-1) ^ (i + 1) * b)
NEXT
PRINT "y="; y
Тестирование выполнено в программе QB64 ( Скачать )