SNOBOL: gerador de números aleatórios

           define('random(n)')
           ran_var = 1                                           :(random.end)
random
           ran_var = remdr(ran_var * 4676, 414971)
           random = ran_var / 414971.
           random = ne(n,0)   convert(random * n, 'integer') + 1 :(return)
random.end

Ref:

http://www.snobol4.org/doc/gimpel/contents.txt

Created: NaN

Last updated: 24-03-2026 [22:44]

For attribution, please cite this page as:

Charters, T., "SNOBOL: gerador de números aleatórios": https://nexp.pt/SNOBOL2.html (24-03-2026 [22:44])

(cc-by-sa) Tiago Charters - tiagocharters@nexp.pt