إعـــــــلان

تقليص
لا يوجد إعلان حتى الآن.

تمرين رياضي احتمالات 2

تقليص
هذا الموضوع مغلق.
X
X
تقليص
 
  • الصفحة لـ 1
  • تصفية - فلترة
  • الوقت
  • عرض
إلغاء تحديد الكل
مشاركات جديدة
السابق template التالي
  • #1

    تمرين رياضي احتمالات 2

    السلام عليكم ورحمة الله وبركاته
    عندنا مصفوفتين :

    كود PHP:
    b={1,2,3,4,5,6,7,8,9}; 
    m={2,3,4,5,6,7,8,9}; 
    سنشكل كسر بسطه من المجموعة b و المقام من المجموعة m

    الشرط : ..... كم كسر يمكن تشكيله بحيث لا يكون حاصله 1 و ايضا لا يتساوى مع كسر أخر
    ---- لقد حاولت و ساعرض فكرتي بعد افكاركم --------

    تحياتي
    الكلمات الدلالية: احتمالات, تمرين, رياضى
  • #2
    محاولة في انتظار افكاركم

    [hide]
    كود PHP:
    b={1,2,3,4,5,6,7,8,9}; 
    m={2,3,4,5,6,7,8,9};
    x=1
    p     = {} ; bast={}; mkam={};
    for     i,n in pairs(m) do
      for     k ,v in pairs(b) do
       if     v ~= n then
       p    [x] = Math.Round(v/n,2); bast[x] = v; mkam[x] = n; x=x+1;
           end ; end
     end
     
         for i,n in pairs(p) do c=i+1;
          gh = String.ToNumber(n);
       for     c ,k in pairs(p) do
           gh1 = String.ToNumber(k);
       if     gh1 == gh then
        Table    .Remove(p,c); Table.Remove(mkam,c); Table.Remove(bast,c); 
             end
      end
     end  

    igli     ="";
    for     i=1,#p do
    igli = igli .. bast[i].." / " .. mkam[i] .." = " .. p[i] .."\r\n"
    end

    Dialog    .Message("igli", igli); 
    [/hide]

    تعليق

    • #3
      بسم الله الرحمن الرحيم
      تمرين جميل ومفيد اخي عبد الهادي
      لم اعرف ان اضع حل تاني
      يكفيني ان افهم حلك واتعلم منه
      موفق بإذن الله ... لك مني أجمل تحية .

      تعليق

      • #4
        للإطــــلاع

        تعليق

        • #5
          من الخطأ استعمال Math.Round في تساؤل طرح يشكل مباشر حول القسمة
          + النتائج ليست دقيقة ( فقط تخمين بالنظر لعدد الاحتمالات)

          تعليق

          • #6
            عدد الاحتمالات 49



            موفق
            التعديل الأخير تم بواسطة ثامر أبو بلقيس; الساعة 14-09-2017, 06:49 PM.

            تعليق

            • #7
              موفق
              [html]a= {1,2,3,4,5,6,7,8,9};
              b= {2,3,4,5,6,7,8,9};
              -------------Real possibilities--------------
              items={};tamer={};flags= {};belkiss={}-------
              for i=1,8 do--------ABOU_BELKISS 2017 -------
              for k=1,9 do---------------------------------
              if b[i]/a[k] ~= 1 then-----------------------
              Table.Insert(items, k,a[k]/b[i]);------------
              Table.Insert(tamer, k,a[k].."/"..b[i].."=")--
              end;end;end----------------------------------
              for p=1,table.getn(items) do----------------
              if not flags[items[p]] then------------------
              io.write(' ' .. items[p])--------------------
              flags[items[p]] = true-----------------------
              Table.Insert(belkiss, p, items[p]);----------
              end;end;t=''---------------------------------
              for n,k in pairs(belkiss) do-----------------
              t =t..tamer[n].. belkiss[n].."\r\n"----------
              end------------------------------------------
              ---------------------------------------------
              Dialog.Message('عدد الاحتمالات '..Table.Count(belkiss),t);[/html]

              تعليق

              • #8
                وبطريقة بناء مختلفة قليلا
                كود PHP:
                ---Global functions
                function test(belkiss,thamer)
                for                 i =1,#belkiss do
                if belkiss[i]==thamer then
                return true
                end                ;end
                return false
                end
                --- On Click
                a                = {1,2,3,4,5,6,7,8,9};
                b= {2,3,4,5,6,7,8,9};
                k={};etat =false
                for j =1,#b do
                for i =1,#a do
                if a[i]/b[j] ~=1 then
                if test(k,a[i]/b[j])==false then
                Table                .Insert(k, i, a[i]/b[j]);
                end;end;end;end

                Dialog                .Message("عدد الإحتمـــالات", Table.Count(k)); 

                تعليق

                • #9
                  المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركة
                  موفق
                  [html]a= {1,2,3,4,5,6,7,8,9};
                  b= {2,3,4,5,6,7,8,9};
                  -------------Real possibilities--------------
                  items={};tamer={};flags= {};belkiss={}-------
                  for i=1,8 do--------ABOU_BELKISS 2017 -------
                  for k=1,9 do---------------------------------
                  if b[i]/a[k] ~= 1 then-----------------------
                  Table.Insert(items, k,a[k]/b[i]);------------
                  Table.Insert(tamer, k,a[k].."/"..b[i].."=")--
                  end;end;end----------------------------------
                  for p=1,table.getn(items) do----------------
                  if not flags[items[p]] then------------------
                  io.write(' ' .. items[p])--------------------
                  flags[items[p]] = true-----------------------
                  Table.Insert(belkiss, p, items[p]);----------
                  end;end;t=''---------------------------------
                  for n,k in pairs(belkiss) do-----------------
                  t =t..tamer[n].. belkiss[n].."\r\n"----------
                  end------------------------------------------
                  ---------------------------------------------
                  Dialog.Message('عدد الاحتمالات '..Table.Count(belkiss),t);[/html]
                  المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركة
                  وبطريقة بناء مختلفة قليلا
                  كود PHP:
                  ---Global functions
                  function test(belkiss,thamer)
                  for                   i =1,#belkiss do
                  if belkiss[i]==thamer then
                  return true
                  end                  ;end
                  return false
                  end
                  --- On Click
                  a                  = {1,2,3,4,5,6,7,8,9};
                  b= {2,3,4,5,6,7,8,9};
                  k={};etat =false
                  for j =1,#b do
                  for i =1,#a do
                  if a[i]/b[j] ~=1 then
                  if test(k,a[i]/b[j])==false then
                  Table                  .Insert(k, i, a[i]/b[j]);
                  end;end;end;end

                  Dialog                  .Message("عدد الإحتمـــالات", Table.Count(k)); 



                  ات شاء الله دخول مدرسي ناجح و العائلة بخير
                  حلول جد رائعة بارك الله فيكم
                  دائما مبدع

                  تعليق

                  السابق template التالي

                  مواضيع تهمك

                  تقليص
                  Empty RSS Feed.
                  يعمل...
                  X