Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
13
Task/Variadic-function/FreeBASIC/variadic-function-2.basic
Normal file
13
Task/Variadic-function/FreeBASIC/variadic-function-2.basic
Normal file
|
|
@ -0,0 +1,13 @@
|
|||
100 DEF PROC printAll DATA
|
||||
110 DO UNTIL ITEM()=0
|
||||
120 IF ITEM()=1 THEN
|
||||
READ a$
|
||||
PRINT a$
|
||||
130 ELSE
|
||||
READ num
|
||||
PRINT num
|
||||
140 LOOP
|
||||
150 END PROC
|
||||
|
||||
200 printAll 3.1415, 1.4142, 2.71828
|
||||
210 printAll "Mary", "had", "a", "little", "lamb",
|
||||
Loading…
Add table
Add a link
Reference in a new issue