8.3.. Naći proizvod prirodnih brojeva u intervalu od k do n koji su deljivi sa 2 a nisu djeljivi sa 3.
Opis rješenja: Provjera djeljivosti izvodi se logičkim izrazom IF ((i MOD 2 = 0) AND (i MOD 3 <> 0)) THEN (djeljivi sa 2 i nisu djeljivi sa 3).
Listing programa:
PROGRAM p08312060;
CLS
PRINT "Od broja: ";
INPUT K
PRINT "Do broja: ";
INPUT N
P = 1
I = K
DO
IF ((I MOD 2 = 0) AND (I MOD 3 <> 0)) THEN
P = P * I
END IF
I = I + 1
LOOP UNTIL I > N
PRINT "PROIZVOD PRIRODNIH BROJEVA DJELJIVIH SA 2, A NEDJELJIVIH SA 3 OD "; K ; " DO "; N; " je "; P
END
Ispis na ekranu:
Index
|