tasks a-s
This commit is contained in:
parent
47bf37c096
commit
b83f433714
12433 changed files with 156208 additions and 123 deletions
5
Task/Binary-digits/Joy/binary-digits-1.joy
Normal file
5
Task/Binary-digits/Joy/binary-digits-1.joy
Normal file
|
|
@ -0,0 +1,5 @@
|
|||
HIDE
|
||||
_ == [null] [pop] [2 div swap] [48 + putch] linrec
|
||||
IN
|
||||
int2bin == [null] [48 + putch] [_] ifte '\n putch
|
||||
END
|
||||
5
Task/Binary-digits/Joy/binary-digits-2.joy
Normal file
5
Task/Binary-digits/Joy/binary-digits-2.joy
Normal file
|
|
@ -0,0 +1,5 @@
|
|||
0 setautoput
|
||||
0 int2bin
|
||||
5 int2bin
|
||||
50 int2bin
|
||||
9000 int2bin.
|
||||
Loading…
Add table
Add a link
Reference in a new issue