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

**ثامر أبو بلقيس ثامر أبو بلقيس** · 17-10-2013, 02:42 PM

يرفع

**admin admin** · 17-10-2013, 08:10 PM

حياك الله أخى ثامر

ان شاء الله الأخوة يتعاونوا معك فى هذا المشروع الجديد

موفق بإذن الله ... لك مني أجمل تحية .

**ثامر أبو بلقيس ثامر أبو بلقيس** · 17-10-2013, 08:13 PM

بارك الله فيك بإذن الله ثم بتعاون الزملاء سيتم تجسيد كل فكرة
تطرح لتتاح إن شاء الله

**عبود عبود عبود عبود** · 17-10-2013, 09:27 PM

للأسف أنا ضعيف رياضيا

ولكن برمجيا جاااااااااامد

**ثامر أبو بلقيس ثامر أبو بلقيس** · 17-10-2013, 10:44 PM

سنصل لحل معا إن شاء الله

**ثامر أبو بلقيس ثامر أبو بلقيس** · 18-10-2013, 12:38 AM

أخي عبود حتى نحسب المضاعفات لعدد تعرف بأنها غير منتهية
وقد أرسل لك أحد الأكواد الجميلة حيث يستغل فيها القاسم المشترك
الأكبر للحصول على المضاعف المشترك الأصغر لعددين
لنزرع في global function

كود:

function belkiss( m, n )
    while n ~= 0 do
        local q = m
        m = n
        n =  Math.Mod(q, n);
    end
    return m
end
 
function thameur( m, n )
    return ( m ~= 0 and n ~= 0 ) and m * n / belkiss( m, n ) or 0
end

لاحظ

كود:

belkiss( m, n )

تعبر عن القاسم المشترك الأكبر

و

كود:

thameur( m, n )

تعبر عن المضاعف المشترك الأصغر

وحتى يتم استغلال الأكواد نضع أنبوت 1 و انبوت 2
لحساب القاسم المشترك الأصغر بكود غير الذي طرح في مشاركات سابقة تحت زر نضع

كود:

m = Input.GetText("Input1");
n = Input.GetText("Input2");
 Dialog.Message("Notice", belkiss( m, n ));

أما إذا أردنا حساب المضاعف المشترك الأكبر محل حديثنا
نستغل الانبوت 3 و4 للكود التالي :

كود:

m = Input.GetText("Input3");
n = Input.GetText("Input4");

 Dialog.Message("Notice", thameur( m, n ));

ستلاحظ أنه قد تحصلنا على المضاعف المشترك لعددين

معلومة رياضية : لحساب مضاعف عدة أعداد يمكن أن يتم حساب كل مضاعفين للعدد الاول و الثاني
ثم حساب مضاعفي العدد الثالث والرابع ثم نحسب مضاعف الناتيجين و على هذا النمط يتم البناء

أرجو أني أفدت و بالتأكيد ستبقى المسافة المتبقية عليك

**عبود عبود عبود عبود** · 18-10-2013, 12:52 AM

عندما أعود بعد غد من عملى إن شاء الله سوف أحاول أن أركز أكثر على مثل هذة الحاجات البرمجية والتى لم لأضعها فى أولوياتى أو موضع إهتماماتى إلى الآن

مع أنى خريج معهد فنى صناعى سنة 2001

سأركز معك إن شاء الله بعدما أسترجع معلوماتى الرياضيـــــــة

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

المضاعف المشترك الأصغر

المضاعف المشترك الأصغر

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

مواضيع تهمك