|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Alex Povolotsky 2:5020/145 26 Feb 2001 09:07:51 To : rendez-vous@mtu-net.ru Subject : Re: Генератор случайных чисел. -------------------------------------------------------------------------------- .RFC-X-Complaints-To: usenet@shuttle.svib.ru .RFC-NNTP-Posting-Date: Mon, 26 Feb 2001 05:07:51 +0000 (UTC) .RFC-X-Newsreader: Gnus v5.6.45/XEmacs 21.1 - "Channel Islands" From: Alex Povolotsky <tarkhil@over.ru> >>>>> "rendez-vous" == rendez-vous writes: > сгенерировать три РАЗHЫХ случайных числа, а получаю три одинаковых. Может > кто-нибудь сталкивался с этой проблемой и знает секрет работы с рандомом? Секрет, как всегда, прост. RTFM называется. > Вот, что я пишу: > $r= srand; При этом инициализируется генератор случайных чисел. Инициализация происходит с использованием текущего времени в секундах. > $r= rand; > $s= srand; Тут он опять инициализируется, тем же временем. > $s= rand; > $p= srand; И опять. > $p= rand; > Потом "делаю" print для каждой переменной и вижу, что они все одинаковые > (c). Первородный грех всех программ перед программистами: программа делает то, что ей велели, а не то, что имели в виду. -- Alex. --- ifmail v.2.15 * Origin: Minas Tirith (2:5020/145@fidonet) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/10400e1a81c11.html, оценка из 5, голосов 10
|