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

Listing programa:

1
2
3
4
5
6
7
8
REM 08111038
CLS
FOR i = 1 TO 17
 IF i MOD 3 <> 0 THEN
  PRINT i
 END IF
NEXT i
END

Ispis na ekranu:

Index