8.1.. Izračunati proizvod parnih prirodnih brojeva od 1 do 5.

Listing programa:

REM 08112061 
CLS
p = 1
FOR i = 1 TO 5
    IF i MOD 2 = 0 THEN p = p * i
NEXT i
PRINT "Proizvod parnih prirodnih brojeva od 1 do 5 je:"; p
END

Ispis na ekranu:

Index