8.3.. Napisati program za ispis sume reciprocnihvrijednosti prvih n prirodnih brojeva.

Opis programa: Početna vrijednost sume je 0 (s:= 0). Izraz za uvačavanje sume je s = s + 1/i.

CLS
REM suma reciprocnihvrijednosti prvih n prirodnih brojeva
PRINT "Napisati program za ispis sume reciprocnih vrijednosti prvih n prirodnih brojeva (harmonijski niz: 1 + 1/2 + 1/3 + ... + 1/n)"
INPUT "Unesi broj:", n
i = 1
DO
    PRINT 1 / i
    i = i + 1
LOOP UNTIL i > n
END

Ispis na ekranu:

Index