8.3.. Ispisati prirodne brojeve od 1 do 17 koji su djeljivi sa a.

Listing programa:

REM p08311039 djeljivi sa a do 17
PRINT "Broj za dijeljenja: ";
input a
I = 1
DO
  IF I MOD a = 0 THEN
    PRINT I
  END IF
  I = I + 1
LOOP UNTIL I > 17
END

Ispis na ekranu:

Index