11 lines
151 B
Text
11 lines
151 B
Text
|
PROGRAM "forby"
|
||
|
|
|
||
|
|
DECLARE FUNCTION Entry()
|
||
|
|
|
||
|
|
FUNCTION Entry()
|
||
|
|
FOR i% = 0 TO 100 STEP 2
|
||
|
|
PRINT FORMAT$("###", i%)
|
||
|
|
NEXT i%
|
||
|
|
END FUNCTION
|
||
|
|
END PROGRAM
|