8.3.. Ispisati neparne prirodne brojeve od 1 do 17.

Listing programa:

REM p08311036 
CLS
I=1
DO
  IF I MOD 2 >< 0 THEN
    PRINT I
  ENDIF	
  I = I +  1
LOOP UNTIL I > 17
END

Ispis na ekranu:

Index