8.1.. Izračunati i ispisati sumu reciprocnih vrijednosti prirodnih brojeva od k do n.

Opis rješenja: Početna vrijednost sume s (0). FOR petlja obezbjeđuje promjenu vrijednosti kontrolne varijable i od k do n.

Listing programa:

1  REM 08112008
10 PRINT "Granice k,n ";
20 INPUT k, n
30 s = 0
40 FOR i = 1 TO n
50   s = s + 1/i
60 NEXT i
60 PRINT "Suma od "; k ; " do "; n; " je "; s
70 END

Ispis na ekranu:

Index