aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data commit

Browse source
This commit is contained in:
Ingy döt Net 2023-07-01 11:58:00 -04:00
parent 7387c8f97b
commit cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Task/Loops-Infinite/BASIC/loops-infinite-1.basic Normal file
View file

@ -0,0 +1,3 @@
while 1
print "SPAM"
wend

3
Task/Loops-Infinite/BASIC/loops-infinite-2.basic Normal file
View file

@ -0,0 +1,3 @@
do
print "SPAM"
loop

3
Task/Loops-Infinite/BASIC/loops-infinite-3.basic Normal file
View file

@ -0,0 +1,3 @@
for i = 1 to 10 step 0
print "SPAM"
next i

2
Task/Loops-Infinite/BASIC/loops-infinite-4.basic Normal file
View file

@ -0,0 +1,2 @@
10 print "SPAM"
20 goto 10

1
Task/Loops-Infinite/BASIC/loops-infinite-5.basic Normal file
View file

@ -0,0 +1 @@
10 clr:print "Commodore Spam! ";:gosub 10

1
Task/Loops-Infinite/BASIC/loops-infinite-6.basic Normal file
View file

@ -0,0 +1 @@
10 clear : print "Apple Spam! ";: gosub 10

3
Task/Loops-Infinite/BASIC/loops-infinite-7.basic Normal file
View file

@ -0,0 +1,3 @@
10 for i = 1 to 10 step 0 : rem A zero step makes the loop infinite
20 print "SPAM";
30 next i

2
Task/Loops-Infinite/BASIC/loops-infinite-8.basic Normal file
View file

@ -0,0 +1,2 @@
10 print "Spam! ";
20 run

1
Task/Loops-Infinite/BASIC/loops-infinite-9.basic Normal file
View file

@ -0,0 +1 @@
10 print "SPAM SPAM! ";:if 1 then 10