Seven-sided dice from five-sided dice: Difference between revisions

m
→‎{{header|REXX}}: changed a comment.
m (→‎{{header|REXX}}: added/changed comments and whitespace, changed indentations, elided a blank line in the output, added option to specify a seed (for RANDOM) for repeatability, change height of output window.)
m (→‎{{header|REXX}}: changed a comment.)
Line 1,450:
if trials=='' | trials="," then trials= 1 /*Not specified? Then use the default.*/
if sample=='' | sample="," then sample=1000000 /* " " " " " " */
if datatype(seed,'W') then call random ,,seed /*NumericInteger? Then use it as a RAND seed.*/
/* [↑] one million samples to be used.*/
do #=1 for trials; die.=0 /*performs the number of desired trials*/