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

INPUT n
FOR i=1 TO n
s=s+i^(i+1)
NEXT
PRINT"summa=";s