Pick random element: Difference between revisions

Content added Content deleted
m (→‎{{header|Phix}}: syntax coloured, extended to show mixed types)
(Added Hare)
Line 751: Line 751:
70 PRINT ARR(C)</lang>
70 PRINT ARR(C)</lang>
{{out}}<pre> 81</pre>
{{out}}<pre> 81</pre>

=={{header|Hare}}==
<lang hare>use fmt;
use math::random;
use datetime;

export fn main() void = {
const array = ["one", "two", "three", "four", "five"];
const seed = datetime::now();
const seed = datetime::nsec(&seed);
let r = math::random::init(seed: u32);

fmt::printfln("{}", array[math::random::u32n(&r, len(array): u32)])!;
};</lang>


=={{header|Haskell}}==
=={{header|Haskell}}==