Largest int from concatenated ints: Difference between revisions
Content added Content deleted
m (→{{header|REXX}}: simplified some code, added/changed whitespace and comments, used a smaller font for the output for the 2nd example.) |
m (→{{header|REXX}}: cleaned up some code for literals.) |
||
Line 1,939: | Line 1,939: | ||
===simple integers=== |
===simple integers=== |
||
<lang rexx>/*REXX program constructs the largest integer from an integer list using concatenation.*/ |
<lang rexx>/*REXX program constructs the largest integer from an integer list using concatenation.*/ |
||
@.=.; @.1 = |
@.=.; @.1 = 1 34 3 98 9 76 45 4 /*the 1st integer list to be used. */ |
||
@.2 = |
@.2 = 54 546 548 60 /* " 2nd " " " " " */ |
||
@.3 = |
@.3 = 4 45 54 5 /* " 3rd " " " " " */ |
||
w=0 /* [↓] process all the integer lists.*/ |
w=0 /* [↓] process all the integer lists.*/ |
||
do j=1 while @.j\==.; z= space(@.j) /*keep truckin' until lists exhausted. */ |
do j=1 while @.j\==.; z= space(@.j) /*keep truckin' until lists exhausted. */ |
||
Line 1,977: | Line 1,977: | ||
<br>digits, but displaying the result would be problematic for results wider than the display area). |
<br>digits, but displaying the result would be problematic for results wider than the display area). |
||
<lang rexx>/*REXX program constructs the largest integer from an integer list using concatenation.*/ |
<lang rexx>/*REXX program constructs the largest integer from an integer list using concatenation.*/ |
||
@.=.; @.1 = |
@.=.; @.1 = 1 34 3 98 9 76 45 4 /*the 1st integer list to be used. */ |
||
@.2 = |
@.2 = 54 546 548 60 /* " 2nd " " " " " */ |
||
@.3 = |
@.3 = 4 45 54 5 /* " 3rd " " " " " */ |
||
@.4 = |
@.4 = 4 45 54 5 6.6e77 /* " 4th " " " " " */ |
||
w= 0 /* [↓] process all the integer lists.*/ |
w= 0 /* [↓] process all the integer lists.*/ |
||
do j=1 while @.j\==.; z= space(@.j) /*keep truckin' until lists exhausted. */ |
do j=1 while @.j\==.; z= space(@.j) /*keep truckin' until lists exhausted. */ |