Составить программу вычисления и выдачи на печать суммы (или произведения) N элементов бесконечного числового ряда y=-20+15-10+5-0+…- Basic(Бейсик)

INPUT"vvedite kol-vo elementov ",n
r=25
FOR i=1 TO n
r=r-5
y=y+(-1)^i*r
NEXT
PRINT y