Составить программу вычисления и выдачи на печать суммы (или произведения) N элементов бесконечного числового ряда. y=60-57+54-51+48-… — QBasic(Бейсик)

INPUT "vvedite kol-vo chisel ", n
FOR i = 1 TO n
    s = s + (-1) ^ (i - 1) * (60 - (i - 1) * 3)
NEXT
PRINT s

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