#1
Post
by Serpent » Thu May 14, 2020 9:33 pm
Funkcja ustawia elementy zadanej tablicy w losowej kolejności.
Code: Select all
Export Function Shuffle(array);
var i, index;
begin
result := [];
if not array then
exit;
Randomize;
for i = array downto 1 do
begin
index := rand(1, array);
result := Insert(result, result + 1, array[index]);
array := Delete(array, index);
end;
End;
Epickie teksty:
Marek1906: jak zrobic aby sail był zielony?
Kvantovy: Wszystko normalne, wszystko w koło było dziwne
Kvantovy:: To jest fajne, że to nie jest takie głupie
Kvantovy:: remove sos from kanapeczka
Kvantovy:: zdarzają się rzezy które sie filozofom nie śniły
Cenwen: problemem jest gejostwo
"Taki z niego fizyk jak ze mnie baletnica" - Profesor Scholtze o Kvantovym.
JAKBYŁ BYM CZECHEM TO BYM ROZŁOŻYŁ NAMIOT ~Kvanciak