نمایش نتایج 1 تا 23 از 23

نام تاپیک: اعداد تصادفی که جمعشان عددی خاص باشد

Threaded View

پست قبلی پست قبلی   پست بعدی پست بعدی
  1. #6

    نقل قول: اعداد تصادفی

    اون روش که قبلا گذاشتم و حذف کردم کاملا رندوم نمی داد اما فکر کنم این یکی دیگه رندوم باشه اگه اشکال داشت تذکر بدید
    در ضمن تابعی که fmehrvarzi عزیز گذاشتند را امتحان کردم فکر کنم رندوم نباشه یه بار هم خودتون چند بار تست کنید تا مطمئن بشید

    int[] RandSum2 (int from1,int to1,int count1,int sum1)
    {
    to1-=from1;
    sum1-=count1*from1;
    int sum2=0,ran,mx=to1+1;
    Random rr = new Random();
    int[] RandArray = new int[count1];
    while (mx>to1) {
    mx=from1;
    do
    {
    ran=rr.Next(1,Math.Min(to1,sum1-sum2+1));
    mx=Math.Max(mx,RandArray[rr.Next(count1)]+=ran);
    sum2+=ran;
    } while(sum2<sum1);
    RandArray=RandArray.Select(x => (int)Math.Round((double)x/mx*(Math.Min(mx,to1)))).ToArray();
    sum2=RandArray.Sum();
    }
    RandArray=RandArray.Select(x => x+from1).ToArray();
    return RandArray;
    }

    واسه انتخاب ده تا عدد که بین 1 تا 7 باشند و جمعشون بشه 50 این دستورشه

    int[] myarr=RandSum2(1,7,10,50);
    آخرین ویرایش به وسیله rahnema1 : سه شنبه 08 بهمن 1392 در 13:49 عصر

تاپیک های مشابه

  1. پاسخ: 8
    آخرین پست: پنج شنبه 17 تیر 1395, 09:41 صبح
  2. تولید اعداد تصادفی واقعی
    نوشته شده توسط SReza1 در بخش الگوریتم، کامپایلر، هوش مصنوعی و ساختمان داده ها
    پاسخ: 11
    آخرین پست: دوشنبه 24 آبان 1389, 03:43 صبح
  3. سوال: تولید اعداد تصادفی در یک رنج خاص
    نوشته شده توسط mohsen57 در بخش برنامه نویسی در 6 VB
    پاسخ: 12
    آخرین پست: پنج شنبه 09 خرداد 1387, 15:26 عصر
  4. اعداد تصادفی
    نوشته شده توسط داود شهبازی در بخش برنامه نویسی در 6 VB
    پاسخ: 1
    آخرین پست: پنج شنبه 06 مرداد 1384, 02:05 صبح
  5. اعداد تصادفی (2)
    نوشته شده توسط ramin_rp در بخش برنامه نویسی در Delphi
    پاسخ: 11
    آخرین پست: پنج شنبه 15 آبان 1382, 16:36 عصر

قوانین ایجاد تاپیک در تالار

  • شما نمی توانید تاپیک جدید ایجاد کنید
  • شما نمی توانید به تاپیک ها پاسخ دهید
  • شما نمی توانید ضمیمه ارسال کنید
  • شما نمی توانید پاسخ هایتان را ویرایش کنید
  •