المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : الثلاثية الفيثاغورسية


ثامر أبو بلقيس
06-03-2014, 06:30 PM
السلام عليكم ورحمة الله
نتذكر أخي الثلاثية الفيثاغورسية
وهي ثلاثة أطوال تصلح كأطوال لمثلث قائم الزاوية

بحيث يكون مربع طول الضلع الأول + مربع طول الضلع الثاني = مربع طول الضلع الثالث
مثال : أطوال أضلاع مثلث هي : 5 , 12 , 13
بالحساب نجد : مربع 5 + مربع12 = مربع 13
أي : 25+144 =169 لذلك نقول 5 , 12 , 13 ثلاثية فيثاغورسية
=====
وفيمايلي خطوات ايجاد ثلاثية فيثاغورسية انطلاقا من معرفة طول واحد
هنااا حالتين
أولاً : إذا كان العدد فردياً
1) ربّع العدد
2) اقسم العدد الناتج إلى عددين متتاليين
3) يكون العدد الأصلي والعددين الناتجين ثلاثية فيثاغورسية
ثانيا ً :إذا كان العدد زوجياً
1) ربع العدد
2) اقسم العدد الناتج على 2
3) جزئ العدد الناتج إلى عددين فرديين أو زوجيين متتاليين
4) تكون الأعداد الناتجة ثلاثية فيثاغورسية
====================================
وبمساعدة أخي ياسر هاهي ترجمة لهذه الخوارزمية البسيطة
استغل انبوت و أكتب فيه طول معين
قد نوفق في ايجاد ثلاثية تحقق القاعدة
x = Input.GetText("Input1");
v1= x^2
v2= Math.Floor((x*x)/2);
if Math.Mod(x,2)~=0 then
Dialog.Message("Notice", x..","..v2..","..v2+Math.Mod(v1, 2));
else
d2 = x^2/2
d3 =(d2-2)/2
Dialog.Message("Notice",x..","..d3..","..d3+2);
end

السلام عليكم

فرح صالحي
06-03-2014, 08:47 PM
السلام عليكم ورحمة الله وبركاته
جازاك الله خيرا كثيرا
تذكرتها
l’hypoténuse à la puissance 2 = la somme des deux cotés à la puissance 2
موفق بإذن الله ... لك مني أجمل تحية .
:abc_152:

الحارث بن فيصل
07-03-2014, 10:52 AM
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

أبو يوسف
08-03-2014, 06:09 PM
جزاك الله خيرا اخانا أبا بلقيس :abc_152: وبارك الله فيك

أبو فارس
11-03-2014, 05:45 PM
بسم الله الرحمن الرحيم

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

ثامر أبو بلقيس
16-12-2014, 12:37 PM
مرور عطر :abc_138: