14.22. Izračunati sumu neparnih dvocifrene brojeva (nisu djeljivih sa 2).

Opis rješenja: Provjera djeljivosti se izvodi po principu da li je ostatak dijeljenja sa 2 jednak 1. Za provjeru ostatka koristi se naredba MOD. Za slučajeve kad je ostatak dijeljenja sa 2 raličit od 0 izračunava se kumulativna suma s=s+i. Primjeri parnosti:
0 MOD 2 = 0
1 MOD 2 = 1
2 MOD 2 = 0
3 MOD 2 = 1
4 MOD 2 = 0

Listing programa:

REM 14212003
s = 0
FOR i = 10 TO 99                 : REM dvocifreni brojevi
    : REM   neparan dvocifren broj?
    IF i MOD 2 <> 0 THEN
        s = s + i                : REM da, uvecaj sumu
    END IF
NEXT i
PRINT "Suma neparnih = "; s      : REM ispis
END

Ispis na ekranu:

Index