Anonymous user
Largest int from concatenated ints: Difference between revisions
Largest int from concatenated ints (view source)
Revision as of 04:08, 22 October 2013
, 10 years ago→{{header|REXX}}: used SPACE bif instead of STRIP bif, changed indentations. -- ~~~~
m (→{{header|REXX}}: used SPACE bif instead of STRIP bif, changed indentations. -- ~~~~) |
|||
Line 698:
big=word(z,1); index=1 /*assume first number is biggest.*/
do k=2 to words(z);
L=max(length(big), length(x))
if left(x,L,left(x,1)) <<= left(big,L,left(big,1)) then iterate
big=x; index=k
end /*k*/
z=
$=$ || big /*append the "maximum" number. */
end /*while z¬==''*/
say right($,30) ' max for: ' @.j /*show the "max" integer and list*/
end /*j*/
/*stick a fork in it, we're done.*/</lang>
'''output'''
| |||