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

Opis rješenja:

Listing programa:

REM 12700034
PRINT "k= ";
INPUT k
PRINT "n= ";
INPUT n
s = 0
p = 1
I = 1
WHILE I <= 3 * n
    p = p * I
    IF I MOD 3 = 0 THEN s = s + p * k
    I = I + 1
WEND
PRINT "s= "; s
END

Za objašnjenje:

Ispis na ekranu:

Index