8.3.. Naći proizvod prirodnih brojeva u intervalu od k do n koji su deljivi sa 4.

Opis rješenja: Provjera djeljivosti izvodi se logičkim izrazom i MOD 4 = 0 (djeljivi sa 4 bez ostatka).

Listing programa:

REM p08312056;
CLS
PRINT "Od broja: ";
INPUT K
PRINT "Do broja: ";
INPUT N
P = 1
I = K
DO
  IF I MOD 4 = 0 THEN
    P = P * I
  END IF
  I = I + 1 
LOOP UNTIL I > N
PRINT "PROIZVOD PRIRODNIH BROJEVA DJELJIVIH SA 4 OD "; K ; " DO "; N; " je "; P
END

Ispis na ekranu:

Index