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

i = 1: REM pocetna vrijednost kontrolne varijable
DO: REM radi
    p = p * i
    IF i MOD 2 = 0 THEN
        REM ako je i djeljiv sa 2 izvedi
        s = s + znak * p * k: REM suma
        znak = -znak: REM promjena vrijednosti predznaka
    END IF
    i = i + 1: REM slijedeca vrijednost kontrolne varijable i
LOOP UNTIL i > 2 * n: REM sve dok i nije vece od 2*n ponavljaj petlju

PRINT "s="; s
END

Ispis na ekranu:

Index