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

Data update

Browse source
This commit is contained in:
Ingy döt Net 2023-10-02 18:11:16 -07:00
parent 796d366b97
commit 35bcdeebf8
504 changed files with 7045 additions and 610 deletions
Download patch file Download diff file Expand all files Collapse all files

9
Task/Loops-Break/Amazing-Hopper/loops-break-1.hopper Normal file
View file

@ -0,0 +1,9 @@
#include <jambo.h>
Main
Loop
Break if ' Int rand(20) ---show--- Is equal to (10) '
Printnl ( "--", Int rand(20) )
Back
Print '"\nEnd of Loop\n" '
End

8
Task/Loops-Break/Amazing-Hopper/loops-break-2.hopper Normal file
View file

@ -0,0 +1,8 @@
main:
____CODE_JUMP____997416047:,
;{20};rand;int;show;eqto(10);jt(____CODE_JUMP____803885359)
{"--"};{20};rand;int;{"\n"}print;
,jmp(____CODE_JUMP____997416047),____CODE_JUMP____803885359:,
{"\nEnd of Loop\n"};print;
emptystack?do{{0}};return

3
Task/Loops-Break/Icon/loops-break-3.icon Normal file
View file

@ -0,0 +1,3 @@
(while true
(print (let x (rand-int 0 20)))
(when (= x 10) (break)))