مسألة هندسية

السلام عليكم هل حاولت الحلّ أخي ؟؟

أرنا محاولتك هنا حتى نستطيع مساعدتك و إلّا فليس من المطلوب منّا أن نحل واجباتك بدلاً عنك !!

اطرح محاولتك و أنا جاهز لمساعدتك في إكمال الحلّ.

أشهد أن لا إله إلا الله وأن محمد رسول الله

جزاك الله خيرا أخي محمد وليد علي سوء الظن هذا - وطريقتك للأسف أحزنتني كثيرا لمهاجمتك لي بهذه الطريقة

لقد حاولت كثيرا بشتي الطرق وقمت بحل هذه المسألة وولكن بطريقتين منفصلتين

وسأعرض لك الصورة في رسالتي هذه لتعرف كم أن فكرت وتعبت يا أخي الفاضل

الصورة عبارة عن كوعين واحد 90 والأخر 45 والمعادلات منفصلة كلا واحدة علي حدة - لكن يجب ان اقوم بعمل معادلات اخري لكل من 11.25 و 22.50 ولكني أحببت أن اجمع الكود واجعله واحدا ليقوم برسم الكوع بمعلومية الزواية التي اريدها

أرجوا ان اكون قد أستطعت توضيح الفكرة

جزاكم الله خيرا

عمرو عماد كتب:

أشهد أن لا إله إلا الله وأن محمد رسول الله

جزاك الله خيرا أخي محمد وليد علي سوء الظن هذا - وطريقتك للأسف أحزنتني كثيرا لمهاجمتك لي بهذه الطريقة

لقد حاولت كثيرا بشتي الطرق وقمت بحل هذه المسألة وولكن بطريقتين منفصلتين

وسأعرض لك الصورة في رسالتي هذه لتعرف كم أن فكرت وتعبت يا أخي الفاضل

الصورة عبارة عن كوعين واحد 90 والأخر 45 والمعادلات منفصلة كلا واحدة علي حدة - لكن يجب ان اقوم بعمل معادلات اخري لكل من 11.25 و 22.50 ولكني أحببت أن اجمع الكود واجعله واحدا ليقوم برسم الكوع بمعلومية الزواية التي اريدها

أرجوا ان اكون قد أستطعت توضيح الفكرة

جزاكم الله خيرا

لا تحزن أخي فالأمر بسيط لا يحتمل ما حمّلته .

أعتذر منك إن كان كلامي جارحاً أو قاسياً .

أنت قلت أخي في المشاركة الأولى أن المطلوب حساب x و y فقط هل أنا مخطئ ؟؟؟

حسابهما بسيط و إليك الطريقة :

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

أخي محمد وليد جزاكم الله خيرا علي إهتمامك بموضوعي والرد عليه - وأعذرني لقلة أدبي في الرد عليك لكني حزنت عندما أتهمتني بأني لم أحاول

أخي الفاضل ما أقصده أن معادلتي X و Y اللتان تفضلت سيادتك بحلها هل ينفع تطبيقها علي الشكلين الأتيين أم لا ؟؟؟

يعني أنا أستطيع إيجاد المعدلتين X و Y لكلا الشكلين علي حدة - لكني أريد أن أوحد المعادلتين بحيث أن أوجد معادلة ل X بالتعويض فيها بقيم الشكلين يتنج المطلوب دون عمل معادلتين لكل شكل وكذلك Y

أرجوا أن اكون قد أوضحت طلبي

وجزاك اله خيرا للإهتمام

أخي المعادلة التي أوجدتها تصلح لجميع الأشكال ليس فقط لهذين الشكلين و ذلك تبعاً لتغير الـR و الـD و الزاوية المعطاة

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

وأسأل الله عز وجل أن ينفع بك هذه الأمة - قول أمين

بالنسبة للمسألة ما أعرف لماذا لم تظبط معي سأرفق لك صورة من توضح ما أريد وإن كان بها خطأ أرجوا التوضيح

إستخدمت الإكسل لتجربة

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

والله أنا محرج من كثرة أسألتي - لكن أقول لك جزاك الله خيرا وأعذرني في تأخري في الرد فأنا نظرا لظروف عملي لا أستطيع الكتابة بشكل يومي

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

أنظر إلي هاذين السطرين

MsgBox Sqr(500 ^ 2 + 1000 ^ 2) * Sin(Abs(Atn(1000 / 500) - (90 * (22 / 7) / 180)))
'500.632144658238

MsgBox Sqr(500 ^ 2 + 1000 ^ 2) * Cos(Abs(Atn(1000 / 500) - (90 * (22 / 7) / 180)))
'999.683677837592

حيث

R=1000
D=500
ANG=90

وقمت بإستخدام مترجم الفيجوال بيسك لكي أحصل علي النتيجة الموجودة أسفل كل سطر من السطرين السابقين الذان يخرجان مربعا نصيا

وبإعتبار الشكل المستطيل كمثال علي ما أطلب أعتقد أن قيمة ال X و Y لا بد ان تكون مساوية لقيمة R,D

والحسابات الأتية حصلت عليها بإستخدام الألة الحاسبة علي الوضع العلمي

By Calculator 
500^2						= 250000
1000^2						= 1000000
SQR(250000+1000000) 				= 1118.0339887498948482045868343656
1000/500					= 2
ATN(1000/500)					= 1.1071487177940905030170654601785
90 * (22 / 7) / 180				= 1.5707963267948966192313216916398
|ATN(1000/500) - 90 * (22 / 7) / 180|		= 0.4636476090008061162142562314613

Sin(Abs(Atn(1000 / 500) - (90 * (22 / 7) / 180)))	= 0.44721359549995793928183473374633

1118.0339887498948482045868343656 * 0.44721359549995793928183473374633 = 500.00000000000000000000000000007

النتيجة بفضل الله قريبة جدا بإستخدام الألة الحاسبة

لذا أسأل ما هي الطريقة التي إستخدامها في الفيجوال بيسك لي أتجنب نسبة الخطأ التي تعتبر كبيرة بالنسبة لي

إعذرني أخي على تأخري الكبير في الرد عليك .

بالنسبة للـ vb و دقة الأرقام لا علم لي كيف يمكن تحسين هذه النقطة و لكن أيضاً بالـ c# لم أحصل على نتائج أفضل .

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

r = 500
d = 1000


 matlab : 

>> x = w * cos(theta1)

x =

        1000

>> y = w * sin(theta1)

y =

  500.0000

أما المثال الذي قبله :

r = 17174.07
d = 9006.941



 matlab : 
>> x = w * cos(theta1)

x =

  9.0069e+003  = 9.0069 * 10 ^3 = 9006.9


>> y = w * sin(theta1)

y =

   1.7174e+004   = 1.7174 * 10 ^ 4 = 17174.0

و هذه نتائج رائعة و أتمنى أن تحقق لك الدقة التي تريدها.

سامحني أخي على التأخير لأنني لم أصل إلى هذه النتيجة إلّا الآن فقد حاولت الوصول إلى نتائج مرضية في الـc# فعثرت على صنف biginteger لكنه لن يفيدنا في هذه العملية لعدم إمكانية تطبيق التوابع الأساسية عليه مثل sin , cos , atan ............

(تعلم الظروف في سورية الآن :sad: )

أتمنى أن تجد ما تريد في الـvb أو أن تصمم أداة بسيطة في الماتلاب لتحقق المطلوب.

أسأل الله العظيم رب العرش العظيم أن يحفظ سوريا وأهلها من بشار عليه من الله ما يستحق - وأن يشتت شمله ويقلب عليه حاشيته فقط فعل ما لم يفعله أعداء الإسلام بالمسلمين

ولكن في ظل غياب شجاعة وولاء ورجولة ومروءة حكام العرب لا أستطيع أن أقول إلا لكم الله يا سوريا وشعبها - وأسأل الله عز وجل أن يجعل كل هذا في ميزان حسناتكم وأن يخفف عنكم يوم الموقف العظيم - فأخلصوا النية لله وأعلموا أن الدنيا فانية ولا مجال لشعارات الكاذبة مثل القومية والوطنية و و و - ولم ندعوا لكم إلا من منطلق واحد فقط وهو أخواننا في الإسلام - فلا فرق بين سوريا ومصر وسائر البلاد العربية لأننا في الأصل - اصحاب الكتاب الواحد والنبي الواحد والقبلة الواحدة - فلا تنخدعوا بمن يدخل الصف ليطلق الشعارات الزائفة كما يحدث معنا اليوم في مصر

اللهم عليك ببشار وأعوانه وشبيحته - وأنصر أهلنا في سوريا

بالنسبة لسؤال عن الدقة المطلوبة سا أحوال أن أبحث عنها لكي أتفاداها في منتدي الفيجوال بيسك وربنا يسهل

عمرو عماد كتب:

أسأل الله العظيم رب العرش العظيم أن يحفظ سوريا وأهلها من بشار عليه من الله ما يستحق - وأن يشتت شمله ويقلب عليه حاشيته فقط فعل ما لم يفعله أعداء الإسلام بالمسلمين

ولكن في ظل غياب شجاعة وولاء ورجولة ومروءة حكام العرب لا أستطيع أن أقول إلا لكم الله يا سوريا وشعبها - وأسأل الله عز وجل أن يجعل كل هذا في ميزان حسناتكم وأن يخفف عنكم يوم الموقف العظيم - فأخلصوا النية لله وأعلموا أن الدنيا فانية ولا مجال لشعارات الكاذبة مثل القومية والوطنية و و و - ولم ندعوا لكم إلا من منطلق واحد فقط وهو أخواننا في الإسلام - فلا فرق بين سوريا ومصر وسائر البلاد العربية لأننا في الأصل - اصحاب الكتاب الواحد والنبي الواحد والقبلة الواحدة - فلا تنخدعوا بمن يدخل الصف ليطلق الشعارات الزائفة كما يحدث معنا اليوم في مصر

اللهم عليك ببشار وأعوانه وشبيحته - وأنصر أهلنا في سوريا

بالنسبة لسؤال عن الدقة المطلوبة سا أحوال أن أبحث عنها لكي أتفاداها في منتدي الفيجوال بيسك وربنا يسهل

آمين .. آمين .. آمين .. جزاك الله خيراً أخي على دعائك و نصيحتك و عسى أن يمنّ الله علينا برؤية بلاد المسلمين متوحدة تحت راية لا إله إلا الله سيدنا محمد رسول الله

ألق نظرة على هذه الأداة أخي و أرجو أن تحقق لك ما تريده: (مصممة ببرنامج الماتلاب)

ملاحظة : يمكن أن تضع في حقل الـ theta تعبير رياضي و ليس فقط رقم - و هذه من روائع الماتلاب - لتحصل على دقة عالية استخدم pi/2 عوضاً عن 22/14 و pi/4 عوضاً عن 22/28 و pi/6 عوضاً عن 22/42 ...........إلخ

geometry.rar

source.rar

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

أخي العزيز في ردي السابق لم أرد أن أثقل عليك بالأسئلة مرة أخري لما تعانيه من ضيق الوقت ومن وقت عصيب تمر به

لكن أنا لا أريد أستخدام الماتلاب - أنا أريد أستخدام فيجوال بيسك لأني أقوم ببرمجة هذا البرنامج تحت منصة أتوكاد بإستخدام VBA

ليست المشكلة أني أصل إلي الدقة المطلوبة - ولكني مشكلتي أن أصل إلي الدقة المطلوبة بإستخدام كود فيجوال بيسك 6 بالأخص لأن الماكروا بداخل الأتوكاد يعمل بهذه اللغة

جزاكم الله خيرا