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