14 lines
171 B
Text
14 lines
171 B
Text
|
PROGRAM "for"
|
||
|
|
|
||
|
|
DECLARE FUNCTION Entry()
|
||
|
|
|
||
|
|
FUNCTION Entry()
|
||
|
|
FOR i% = 1 TO 5
|
||
|
|
FOR j% = 1 TO i%
|
||
|
|
PRINT "*";
|
||
|
|
NEXT j%
|
||
|
|
PRINT
|
||
|
|
NEXT i%
|
||
|
|
END FUNCTION
|
||
|
|
END PROGRAM
|