{* Задача82 *}

REM basic

' В простую переменную с клавиатуры последовательно ввести N чисел и посчитать их сумму.


10 CLS
30 INPUT "Сколько чисел в последовательности"; N%
40 S = 0
50 For I = 1 To N%
60 INPUT "Очередное число ="; X
70 S = S + X
80 Next I
90 PRINT "Сумма равна"; S
100 End