RandomFrom
Riddle
RandomFrom
Moduł: StrUtils
program Foo;
uses
StrUtils;
{$APPTYPE CONSOLE}
var
tablica: array of String;
begin
SetLength(tablica, 3);
tablica[0] := 'magda';
tablica[1] := 'daniel';
tablica[2] := 'olek';
Writeln(RandomFrom(tablica)); //możemy zobaczyć "magda", "daniel" lub "olek".
end.
Zobacz też: