Пример вывода случайного элемента из массива на Perl:
my @arr = ('foo', 'bar', 'baz');
print random(@arr);
sub random {
my @values = @_;
return $values[int rand scalar @values];
}
Пример вывода случайного элемента из массива на Perl:
my @arr = ('foo', 'bar', 'baz');
print random(@arr);
sub random {
my @values = @_;
return $values[int rand scalar @values];
}
Простое решение рандомного массива в JavaScript.
var array = [1,2,3,4,5];
array.sort(function() { return 0.5 - Math.random() });
Renotes © 2012 -
Заметки web-разработчиков ·RSS