12.9.6. Napisati program koji će za učitanu vrijednost K izračunati vrijednost izraza i ispisati:
Opis rješenja:
Listing programa:
REM 12900046
CLS
PRINT "Koeficijent: ";
INPUT k
p = 1: REM pocetna vrijednost proizvoda
i = k: REM pocetna vrijednost kontrolne varijable
DO: REM radi
p = p * i: REM nova vrijednost proizvoda
i = i + 1: REM slijedeca vrijednost kontrolne varijable i
LOOP UNTIL i > 2 * k: REM sve dok i nije vece od 2*k ponavljaj petlju
PRINT "Keficijent je "; k; " Proizvod je: "; p
END
Ispis na ekranu:
Index
|