Random number generator (device): Difference between revisions

Line 617:

=={{header|REXX}}==

===version 1===

The   32-bit   random number is unsigned and constructed from two smaller 16-bit   numbers,   and it's expressed in decimal.

<lang rexx>/*REXX program generates a random 32-bit number using the RANDOM ~~bif~~.*/

/*───────── The 32-bit random number is unsigned and constructed from */

~~/*─────────~~ two smaller 16-bit numbers, and it's expressed in decimal.*/

/*───────── Note: the REXX random bif has a maximum range of 100,000.*/

Note:   the REXX   '''random'''   BIF has a maximum range

numeric digits 10 /*ensure REXX has enough ~~room.~~ */

of   100,000.

_=2**16 /*a ~~handy-dandy~~ constant to have.*/

<lang rexx>/*REXX program generates and displays a random 32-bit number using the RANDOM BIF.*/

numeric digits 10 /*ensure REXX has enough decimal digits*/

~~say~~ random(0,_-1)*_+random(0,_-1) /*~~gen~~ an unsigned 32-bit random #*/~~</lang>~~

_=2**16 /*a handy─dandy constant to have around*/

r#= random(0, _-1) * _ + random(0, _-1) /*generate an unsigned 32-bit random #.*/

say r# /*stick a fork in it, we're all done. */</lang>

<pre>

4294967296

</pre>

===version 2===

This program generates a random 4 byte character string in the range '00000000'x to 'ffffffff'x