Составить программу вычисления и выдачи на печать суммы (или произведения) N элементов бесконечного числового ряда y = — 2 + 5 — 8 + 11 — 14 + … — Basic(Бейсик)

INPUT"vvedite kol-vo elementov ",n
FOR i:=1 TO n
y=y+(-1)^i*(i*3-1)
NEXT
PRINT "y=";y