Дан ряд
1/2 , 1/3 , 1/4 , … 1/25
Найти сумму ряда
(qbasic)

Вопрос школьника по предмету Информатика

Дан ряд
1/2 , 1/3 , 1/4 , … 1/25
Найти сумму ряда
(qbasic)

Ответ учителя по предмету Информатика

DIM S#, i%

CLS

S# = 0

FOR i% = 1 TO 25

S# = S# + 1 / i%

NEXT i%

PRINT ; «S = «; S#

END