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 12900053
CLS
PRINT "k= ";
INPUT k
PRINT "n= ";
INPUT n
s = 0: REM pocetna vrijednost sume
znak = 1: REM vrijednost predznaka

i = 0: REM pocetna vrijednost kontrolne varijable
DO: REM radi
    s = s + znak * 2 / (k + i): REM nova vrijednost sume
    znak = -znak: REM promjena vrijednosti predznaka
    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, "  k = "; k, "s="; s
END

Ispis na ekranu:

Index