تويت
السلام عليكم ورحمة الله وبركاته
هل فيه طريقة لتفادي تكرار القيم التي تنتجها الدالة random
هل فيه طريقة لتفادي تكرار القيم التي تنتجها الدالة random
-
-
ظهور الأعداد من 1 الى 20 بدون تكراركود PHP:vv=20;k = {};k[1]= Math.Random(1, vv);n=1-----------------------
while Table.Count(k)~= 20 do------------------------------------
t=Math.Random(1, vv);for i = 1,Table.Count(k) do---------------
if t==k[i] then-------------------------------------------------
n=2;end;end----------------------------------------------------
if n == 1 then-------------------------------------------------
k[Table.Count(k)+1]=t;else-------------------------------------
n=1;end;end;---------------------------------------------------
samer={}-------------------------------------------------------
for i =1,20 do-------------------------------------------------
Table.Insert(samer, i, k[i]);----------------------------------
rondom_list = Table.Concat(samer, " - ", 1, TABLE_ALL)---------
end------------------------------------------------------------
Dialog.Message("(^..^)",rondom_list);
غير منقول
-
المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركةظهور الأعداد من 1 الى 20 بدون تكراركود PHP:vv=20;k = {};k[1]= Math.Random(1, vv);n=1-----------------------
while Table.Count(k)~= 20 do------------------------------------
t=Math.Random(1, vv);for i = 1,Table.Count(k) do---------------
if t==k[i] then-------------------------------------------------
n=2;end;end----------------------------------------------------
if n == 1 then-------------------------------------------------
k[Table.Count(k)+1]=t;else-------------------------------------
n=1;end;end;---------------------------------------------------
samer={}-------------------------------------------------------
for i =1,20 do-------------------------------------------------
Table.Insert(samer, i, k[i]);----------------------------------
rondom_list = Table.Concat(samer, " - ", 1, TABLE_ALL)---------
end------------------------------------------------------------
Dialog.Message("(^..^)",rondom_list);
غير منقول
ربي يفرج عليك استاذ .......طبعا لقد فرجت عني .......وجدت بعض الحلول و لم افهم منها شيئا
ساجرب ولنا عودةتعليق
-
للمرة الثانية اريد منك استاذي العزيز ملف من سيربح المليون و اعادة رفعه في موقع غير الخليج
------ رجائي ان تسثني هذا الملف من المبدا الشخصي -------تعليق
-
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .تعليق
-
شكرا وبارك الله لكما لما تقدومه لنا من افادات في طرح الاسئلة وفي الحلول
شكرا جزيلا
تعليق
تعليق