12.9.6. Napisati program koji će za učitanu vrijednost K i N izračunati vrijednost izraza i ispisati:

Opis rješenja:

Listing programa:

REM 12900005
CLS
PRINT "n= ";
INPUT n
p = 1: REM pocetna vrijednost faktorijela
s = 0: REM pocetna vrijednost sume
s1 = 0: REM pocetna vrijednost sume od 1 do i

i = 1: REM pocetna vrijednost kontrolne varijable
DO: REM radi
    s1 = s1 + i: REM nova vrijednost sume od 1 do i
    p = p * i: REM nova vrijednost faktorijela
    s = s + s1 / p: REM nova vrijednost sume kolicnika
    i = i + 1: REM slijedeca vrijednost kontrolne varijable i
LOOP UNTIL i > n: REM sve dok i nije vece od n ponavljaj petlju

PRINT "n= "; n, "Suma je: "; s
END

Ispis na ekranu:

Index