Составить программу вычисления и выдачи на печать суммы (или произведения) N элементов бесконечного числового ряда. y=-243+81-27+9-…- QBasic(Бейсик)

INPUT "vvedite N", n
k = 4
FOR i = 1 TO n
    s = s + (-1) ^ i * 3 ^ k
    k = k - 1
NEXT
PRINT s

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