8.3.. Prebrojati brojeve djeljive sa 3 u intervalu od 1 do 9.
Listing programa:
REM 08312088 CLS i = 1 DO IF i MOD 3 = 0 THEN br = br + 1 END IF i = i + 1 LOOP UNTIL i > 9 PRINT br END
Ispis na ekranu:
Index