8.1.. Naći sumu brojeva u intervalu od a do b djeljivih sa 5.

Listing programa:

REM p08112046
INPUT "Od broja"; a
INPUT "Do broja"; b
s = 0
FOR i = a TO b
    IF i MOD 5 = 0 THEN
        s = s + i
    END IF
NEXT i
PRINT " Suma djeljivih sa 5 u intervalu je "
PRINT s
END

Ispis na ekranu:

Index