Pick random element: Difference between revisions
Content added Content deleted
(Added Uiua solution) |
(PascalABC.NET) |
||
Line 1,201: | Line 1,201: | ||
writeln(s[low(s) + random(length(s))]); |
writeln(s[low(s) + random(length(s))]); |
||
end.</syntaxhighlight> |
end.</syntaxhighlight> |
||
=={{header|PascalABC.NET}}== |
|||
<syntaxhighlight lang="delphi"> |
|||
begin |
|||
var a := Arr('cat','dog','wolf','zebra'); |
|||
a.RandomElement.Print |
|||
end. |
|||
</syntaxhighlight> |
|||
=={{header|Perl}}== |
=={{header|Perl}}== |