INPUT " vvedite N ", n
FOR i = 1 TO n
y = (i + 8) * 2 * (-1) ^ i
s = s + y
IF i < 6 THEN PRINT "y"; i; "="; y; " ";
NEXT
PRINT
PRINT "summa="; s
Тестирование выполнено в программе QB64 ( Скачать )
INPUT " vvedite N ", n
FOR i = 1 TO n
y = (i + 8) * 2 * (-1) ^ i
s = s + y
IF i < 6 THEN PRINT "y"; i; "="; y; " ";
NEXT
PRINT
PRINT "summa="; s
Тестирование выполнено в программе QB64 ( Скачать )