Random number generator (included): Difference between revisions
m
→{{header|REXX}}: show that ooRexx supports negative integers and a range of up to 999999999
Walterpachl (talk | contribs) m (→{{header|REXX}}: oops) |
Walterpachl (talk | contribs) m (→{{header|REXX}}: show that ooRexx supports negative integers and a range of up to 999999999) |
||
Line 510:
* Please add the output from other REXXes
* 10.09.2013 Walter Pachl added REXX/TSO
* 01.08.2014 Walter Pachl show what ooRexx supports
**********************************************************************/
Parse Version v
Line 517 ⟶ 518:
ol=ol random(1,10)
End
If left(v,11)='REXX-ooRexx' Then
ol=ol random(-999999999,0) /* ooRexx supports negative limits */
Say ol</lang>
'''outputs''' from various REXX interpreters:
<pre>
REXX-ooRexx_4.1.3(MT) 6.03 4 Jul 2013: 3 10 6 8 6 9 9 1 1 6
REXX-ooRexx_4.2.0(MT)_32-bit 6.04 22 Feb 2014: 3 10 6 8 6 9 9 1 1 6 -403019526
REXX/Personal 4.00 21 Mar 1992: 7 7 6 7 8 8 5 9 4 7
REXX-r4 4.00 17 Aug 2013: 8 10 7 5 4 2 10 5 2 4
| |||