+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : احتاج مساعدة من مبرمجي الفجوال بسيك 6 (/showthread.php?tid=27573)
RE: احتاج مساعدة من مبرمجي الفجوال بسيك 6 - عبدالله الصافي - 29-12-18
الملف تالف
RE: احتاج مساعدة من مبرمجي الفجوال بسيك 6 - Ahmed_Mansoor - 29-12-18
الله يجزاك كل خير أخي عبدالله على ما تقدمه , فقط بخصوص الملفات المرفقه التي تكون من نوع ملف مضغوط وين رار إذا كان إصدار برنامج الوين رار لديك أصغر من الإصدار في الملف المرفق تظهر لك رسالة بأنه تالف لذلك الأفضل أن تثبت على جهازك برامج 7zip هو مجاني ويفك ضغط جميع برامج الضغط بأي إصدار.
RE: احتاج مساعدة من مبرمجي الفجوال بسيك 6 - عبدالله الصافي - 30-12-18
(29-12-18, 11:26 PM)Ahmed_Mansoor كتب : الله يجزاك كل خير أخي عبدالله على ما تقدمه , فقط بخصوص الملفات المرفقه التي تكون من نوع ملف مضغوط وين رار إذا كان إصدار برنامج الوين رار لديك أصغر من الإصدار في الملف المرفق تظهر لك رسالة بأنه تالف لذلك الأفضل أن تثبت على جهازك برامج 7zip هو مجاني ويفك ضغط جميع برامج الضغط بأي إصدار.
شكرا جزيلا استاذي الكريم
فعلا ظبط معي
(29-12-18, 12:09 PM)hicham716 كتب : هذا هو الكود بالمرفقات لكنه بطيء
ياريت تشرح الفكرة بالظبط
ايه المطلوب اضافته او تعديله علي ما توصلنا اليه سابقا
RE: احتاج مساعدة من مبرمجي الفجوال بسيك 6 - hicham716 - 30-12-18
السلام عليكم و رحمة الله
بارك الله فيكم جميعا
المطلوب هو برنامج عكسي
اعطاء قيمة لكل حرف بحيث يتحقق
A + B + C + H + I + L = D + E + F + G + J + K
A + B + C + H + J + K = D + E + F + G + I + L
A + B + D + H + I + K = C + E + F + G + J + L
A + B + E + H + I + J = C + E + F + G + K + L
A + C + D + H + I + J = B + E + F + G + K + L
اذا شيئت المطلوب هو حل النظمة الخطية من اربع معادلات لي اثناعشر مجهول
في حال وجود حلول كثيرة نأخد الحل ذو القيم الصغرى و الموجب طبعا
يستحسن ان تكون الحلول بين 1 و 20 إن وجدت
RE: احتاج مساعدة من مبرمجي الفجوال بسيك 6 - عبدالله الصافي - 30-12-18
(30-12-18, 01:38 AM)hicham716 كتب : السلام عليكم و رحمة اللهمعني كلامك او ما فهمته
بارك الله فيكم جميعا
المطلوب هو برنامج عكسي
اعطاء قيمة لكل حرف بحيث يتحقق
A + B + C + H + I + L = D + E + F + G + J + K
A + B + C + H + J + K = D + E + F + G + I + L
A + B + D + H + I + K = C + E + F + G + J + L
A + B + E + H + I + J = C + E + F + G + K + L
A + C + D + H + I + J = B + E + F + G + K + L
اذا شيئت المطلوب هو حل النظمة الخطية من اربع معادلات لي اثناعشر مجهول
في حال وجود حلول كثيرة نأخد الحل ذو القيم الصغرى و الموجب طبعا
يستحسن ان تكون الحلول بين 1 و 20 إن وجدت
انه يجب ان تتحقق الخمس معدلات جميعهم فقط
او احداهم؟ أو ماذا؟ ارجو تأكيد تلك النقطة
وممكن ان تكون المجاهيل من 4 الي 12 مجهول اليس كذلك؟
وإذا كانت المجاهيل اقل من 12 فكم يكون عدد المعادلات المطلوبة وتنسيقهم؟
وعند تعدد الحلول نأخذ بأقل قيمة يتساوى عندها طرفي المعادلة أليس كذلك؟
ويجب إعطاء قيم تتراوح بين 1 الي 20 لكل مجهول
والله المستعان
RE: احتاج مساعدة من مبرمجي الفجوال بسيك 6 - hicham716 - 31-12-18
السلام عليكم و رحمة الله
المطلوب اخي هو حل النظمة
الحل يحقق كل المعادلات
A + B + C + H + I + L = D + E + F + G + J + K
A + B + C + H + J + K = D + E + F + G + I + L
A + B + D + H + I + K = C + E + F + G + J + L
A + B + E + H + I + J = C + E + F + G + K + L
A + C + D + H + I + J = B + E + F + G + K + L
نسيت هذا الشرط
A >= B And B >= C And C >= D And D >= E And E >= F And F >= G And G >= H And H >= I And I >= J And J >= K And K >= L
وليست جميعها متساوية
للتوضيح اكثر
احد الحلول المطلوبة هو
A=20
B=19
C=18
D=17
E=16
F=15
G=14
H=05
I=04
J=03
K=02
L=01
هذه القيم تحقق جميع المعادلات اعلاه و تحقق الشرط ايضا
اذن مثل هذا الحل هو المبحوث عنه
كيف نصل اليه برمجيا
RE: احتاج مساعدة من مبرمجي الفجوال بسيك 6 - عبدالله الصافي - 31-12-18
اخي الكريم الحل الذي وضعته في التعليق هو الحل الوحيد علي حسب شروطك
اذا اخذت المجاهيل القيم من 1 الي 20
ويوجد خطأ في كتابة المعادلة قبل الاخيرة فمن الواجب ان تكون هكذا
A + B + E + H + I + J = C + D+ F + G + K + L
ارجو التوضيح إذا كنت فاهمك غلط
RE: احتاج مساعدة من مبرمجي الفجوال بسيك 6 - hicham716 - 01-01-19
ملاحظة في محلها
نعم اخي كتبت E مكان D واصلا اصبحت E مكررة في الطرفين
نفترض ان تلك القيم لا نتوفر عليها
فهل يمكن ان نستخرجها
وهو ذاك المطلوب
اذا كان حل وحيد يكفي المهم كيف نصل اليه
RE: احتاج مساعدة من مبرمجي الفجوال بسيك 6 - عبدالله الصافي - 01-01-19
الحل بالمرفقات
أرجو من الله أن يكون ما تريد
RE: احتاج مساعدة من مبرمجي الفجوال بسيك 6 - hicham716 - 01-01-19
السلام عليكم كيف الحال اخي عبد الله
البرنامج شغال ويعطي النتيجة لهذه الحالة بعينها
اذا اردت تغيير المعادلات او النظمة اين اغير
واعتقد انه يبحث في حدود العشرون فقط
اذا لم يجد نتائج في حدود العشرون يبحث في مجال اكبر
حفظك الله
كيف نجد هذه النتائج انطلاقا من المعادلة كما في الصورة
