Random без повторений!
Вот например такой кусочек кода
Randomize; r:=random(9)+1; как сделать так чтобы когда вызываеш строчку с непосредственным рандомом девят раз(например в цикле), то r ни разу не повторился?! |
Ответ: Random без повторений!
Делай каждый раз проверку, не равен ли результат какому-либо из уже полученных и, если равен, вызывай ещё раз
|
Ответ: Random без повторений!
пробовал! и в масив запихивать и создавать строку, а из нее масив и проверять-нивкакую! напиши если не трудно примерчик!
|
Ответ: Random без повторений!
возможно это:
http://forum.boolean.name/showthread.php?t=12687 для числовго массива возвращемых занчений |
Ответ: Random без повторений!
Цитата:
var digits:array of integer; i:integer; r,t:integer; variable:boolean; {...} For i=1 to i=9 do begin Repeat variable:=false; r:=random(9)+1; for t=1 to 9 do if r=digits[t] then varialbe:=true Until variable=false digits[i]:=r; end; |
Часовой пояс GMT +4, время: 17:07. |
vBulletin® Version 3.6.5.
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Перевод: zCarot