14.6.. Suma trocifrenih brojeva djeljivih sa 3.

Opis rješenja: Početna vrijednost sume je s=0 a kumulativna suma se izračunava sa s =s+i. Provjera djeljivosti se izvodi naredbom MOD tj. IF i MOD 3 = 0 THEN. Ako je ostatak dijeljenja sa 3 jednak 0 to znači da je troicifreni broj djeljiv sa 3.

Listing programa:

REM 14612012
PRINT "Trocifren broj - Suma - djeljiv sa 3"
suma = 0
FOR i = 100 TO 999            : REM za trocifrene brojeve radi
    : REM djeljiv sa 3?    
    IF i MOD 3 = 0 THEN
        suma = suma + i       : REM da, uvecaj sumu
    END IF
NEXT i
PRINT "Suma "; suma           : REM ispis
END

Ispis na ekranu:

Index