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

Opis rješenja:

Listing programa:

REM 12500046
CLS
PRINT "Koeficijent: ";
INPUT k
p = 1: REM pocetna vrijednost proizvoda

FOR i = k TO 2 * k: REM ponavljanje za i=k do i=2*k
    p = p * i: REM nova vrijednost proizvoda
NEXT i: REM napredovanje kroz petlju

PRINT "Keficijent je "; k; " Proizvod je: "; p
END

Ispis na ekranu:

Index