Составить программу вычисления и выдачи на печать произведения N элементов бесконечного числа ряда. y=4(-6)8(-10)12 — QBasic(Бейсик)

INPUT "vvedite kolichestvo elementov ", n
y = 1
FOR i = 1 TO n
    y = y * (-1) ^ (i + 1) * 2 * (i + 1)
NEXT
PRINT "y="; y

Тестирование выполнено в программе QB64 ( Скачать )