{* Задача161 *}

REM basic

'


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