Написать программу для нахождения суммы 1/sqr1 +1/sqr2+1/sqr3+…. . +1/sqr n — QBasic(Бейсик)

disel
1
2
3
4
5
6
7
CLS
INPUT "n="; n
s = 0
FOR i = 1 TO n
    s = s + 1 / SQR(i)
NEXT i
PRINT "s="; s

Тестирование выполнено в программе QB64 ( Скачать )

Похожие записи/страницы:

Leave a Comment