Составить программу вычисления и выдачи на печать суммы N элементов бесконечного числового ряда у=1-6+11-16+21-… — Basic(Бейсик) — Справочник разработчика. Приемная комиссия

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

Составить программу вычисления и выдачи на печать суммы N элементов бесконечного числового ряда у=1-6+11-16+21-… — Basic(Бейсик)