Jump to content

Largest int from concatenated ints: Difference between revisions

→‎Version 4: improved the function integer to handle the kast case
m (→‎exponentiated integers: added a comment to the REXX section header.)
(→‎Version 4: improved the function integer to handle the kast case)
Line 2,146:
If Datatype(z,'W') Then
Return z+0
Else Do
If Datatype(z)=num Then Do
Do i=1 To 4
dig= digits()*10
Numeric Digits dig
If Datatype(z,'W') Then
Return z+0
End
Say 'Illegal integer:' z
Return '?'
End
Return '?'
End
 
largeint: Procedure
Line 2,178 ⟶ 2,189:
4 45 54 5 -> 554454
4 45 54 5 6.6e77 -> 660000000000000000000000000000000000000000000000000000000000000000000000000000554454
Illegal integer: .2
3 3 .2 -> ** invalid ** bad integer .2
4 45 54 5 6.6e1001 -> 660000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000554454</pre>
4 45 54 5 6.6e1001 -> ** invalid ** bad integer 6.6e1001</pre>
 
=={{header|Ring}}==
2,299

edits

Cookies help us deliver our services. By using our services, you agree to our use of cookies.