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

Another update from ingydotnet^djgoku

Browse source
This commit is contained in:
Ingy döt Net 2015-11-18 06:14:39 +00:00
parent 91df62d461
commit 948b86eafa
7604 changed files with 108452 additions and 22726 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Task/Variable-size-Set/360-Assembly/variable-size-set.360
View file

@ -21,4 +21,5 @@ B1 DC B'10101010' 1 byte
* Hexadecimal value (X)
X1 DC X'AA' 1 byte
* Address value (A)
A4 DC A(176) 4 bytes
A4 DC A(176) 4 bytes but only 3 bytes used
* (24 bits => 16 MB of storage)

13
Task/Variable-size-Set/REXX/variable-size-set.rexx
View file

@ -1,2 +1,11 @@
numeric digits 100
abc=12345678901111111112222222222333333333344444444445555555555.66
/*REXX program demonstrates on setting a variable (using a "minimum var size".*/
numeric digits 100 /*default: 9 (decimal digs) for numbers*/
/*── 1 2 3 4 5 6 7──*/
/*──1234567890123456789012345678901234567890123456789012345678901234567890──*/
z = 12345678901111111112222222222333333333344444444445555555555.66
n =-12345678901111111112222222222333333333344444444445555555555.66
/* [↑] these #'s are stored as coded. */
/*stick a fork in it, we're all done. */