استخراج كل الاحتمالات لأرقام محددة (موضوع الأسبوع الخامس)

[ياسر خليل أبو البراء]

السلام عليكم ورحمة الله وبركاته

إخواني الكرام

انشغلنا قليلاً ولم يذكرني أحد بموضوع الأسبوع الخامس ..

عموماً كموضوع للبحث : بفرض أن لديك الأرقام 1 ، 2 .. المطلوب عمل معادلات أو أكواد لاستخراج كل القيم المحتملة لهذين الرقمين

النتائج المتوقعة ستكون كالتالي :

1111
1112
1121
1122
1211
1212
1221
1222
2111
2112
2121
2122
2211
2212
2221
2222

تقبلوا تحياتي

[أبوبسمله]

جزاك الله كل خير يا ابو البراء

للاسف جربت كل الوسائل المتاحه لى للبحث ولم افلح

ساحاول غدا بمشيئة الله بعد العوده من العمل

تقبل تحياتى وتقديرى ياغالى

[ياسر خليل أبو البراء]

أخي العزيز أحمد

جزيت خيراً على محاولاتك المستمرة وهذا ما أنتظره من كل الأعضاء بالمنتدى

عليك المحاولة وليس عليك إدراك النجاح

[سليم حاصبيا]

 اخي ياسر 

يسرني ان  أقوم بتقديم أول الحلول

 

Permutation.rar

[ياسر خليل أبو البراء]

بارك الله فيك أخي الحبيب سليم

يرجى مراجعة الموضوع ..ملفك جميل جداً ولكنه ليس المطلوب بالضبط

عندنا رقمين فقط 1 و 2 ..المطلوب عمل تشكيلة بكل الاحتمالات .. والنتائج المتوقعة مرفقة في المشاركة الأولى بما لا يدع مجالاً للتخمين

تقبل تحياتي

 

[سليم حاصبيا]

ربما ينفع هذا الكود

Option Base 1
Sub rep()
Dim mar()
mar = Array("1", "2")
   For a = LBound(mar) To UBound(mar)
       u = mar(a)
      For b = LBound(mar) To UBound(mar)
          v = mar(b)
          
               For c = LBound(mar) To UBound(mar)
                x = mar(c)
                    
                       For d = LBound(mar) To UBound(mar)
                          t = mar(d)
                        
       Cells(m + 1, 1) = u & v & x & t
         m = m + 1
         
  Next: Next: Next: Next
      
End Sub

 

[ياسر خليل أبو البراء]

جزاكم الله خيراً أخي الحبيب سليم وبارك الله فيك

وننتظر حلول أخرى من الأخوة الأعضاء .. على الجميع البحث في الأمر لمزيد من الاستفادة لأن لما يكون واحد بس اللي بيبحث غير لما الكل بيبحث ..

تقبلوا تحياتي

[أبوبسمله]

اخى الحبيب

انا وصلت بس لسه مش مظبط لانى لما نفذت مظبطتش معايا بكره باذن الله هكمل بحث

سجلت هناك علشان اشوف الاكواد وبكره اكمل ان شاء الله

بارك الله فيك اخى سليم

تقبلوا تحياتى

[محي الدين ابو البشر]

في 4/2/2016 at 00:58, ياسر خليل أبو البراء said:

السلام عليكم ورحمة الله وبركاته

إخواني الكرام

انشغلنا قليلاً ولم يذكرني أحد بموضوع الأسبوع الخامس ..

عموماً كموضوع للبحث : بفرض أن لديك الأرقام 1 ، 2 .. المطلوب عمل معادلات أو أكواد لاستخراج كل القيم المحتملة لهذين الرقمين

النتائج المتوقعة ستكون كالتالي :

1111
1112
1121
1122
1211
1212
1221
1222
2111
2112
2121
2122
2211
2212
2221
2222

تقبلوا تحياتي

السلام عليكم

فقط استفسار

اذا كان لدينا رقمين فقط فالمفروض ان الاحتمالات  احتمالين

الآن عدد الخانات 4 أو متغير

ماذا لوكانت الخانات يكمن تحديدها (متغيرة)

أرجو الإفادة

 

[ياسر خليل أبو البراء]

أكيد عدد الاحتمالات هيزي

يعني لو اشتغلنا على الرقمين فقط وقلنا عايزين 4 خانات .. فيكون النتائج 2 ^ 4 =16

شوف إنت عايز كام خانة .. لو عايز 10 خانات من الرقمين فتكون الاحتمالات 2 ^ 10 وهكذا ..