{* Задача159 *}

REM basic

'


CLS
INPUT "Введите n"; n
S=0
For i=1 To n
S=S+i
Next I
PRINT "S="; S
End