أرجو المساعدة في كتابة مسألة هانوي (Tower of hanoi(
باستخدام لغة لسب
في الذكاء الاصطناعي
وشكرا
أرجو المساعدة في كتابة مسألة هانوي (Tower of hanoi(
باستخدام لغة لسب
في الذكاء الاصطناعي
وشكرا
إن لم يكن عون من الله للفتى فأول ما يقضي عليه اجتهاده
الأخ الكريم/الأخت الكريمة
السلام عليكم ورحمة الله وبركاته
مرحباً بكم في منتدى الفريق العربي للبرمجة
نود تنبيهك أن العنوان غير مناسب.
الرجاء اختيار عنوان مناسب أكثر في مواضيعك القادمة، وهذا بمثابة إشعار للأهمية.
وفي حال التكرار سيتعرض موضوعك للإغلاق والحذف!!!
قواعد المشاركة
شاكرين لكم حُسن تعاونكم
السلام عليكــم ورحمـة الله وبركاتــه ،،
اخي العزيز اولا موضوع ان نكتب هذه الخوارزميه اتوقع انه ليس منطقي والسبب كاننا نقوم بحل واجب ولكن لن نجعلك تغضب منا واتمنى منك في المرات القادمه
ان تشاركنا بما تريد لكي تعم الفائده ., وجزاك الله كل الخير مع كل الاحترام والتقدير لشخصك الكريم
على كل لنشرح ماهي الخوارزميه سويتا , فممكن ان يكون احد الاخوه ما يريد ان يشارك به
__________________
ما معنا هذا الرسم ؟
المطلوب من الرسم السابق هو ان نقوم بنقل الاقراص من1 الى 3 باستخدام 2 وطبعا هنالك شروط ومقيدات منها ان يكون الشكل التسلسلي من الاكبر الى الاصغر تصاعديا من الاسفل
الى الاعلى اي نفس الشكل الذي كان عليه البرج رقم 1 وهنا يجب ان نعلم امر مهم جدا وهو كيف يتم ذالك باقل عدد من النقلات والتي يشترط بها ان لا يوضع قرص اكبر على قرص اصغر
منه اثناء النقلات , هنا يجد بنا ان نستوعب فكريه مهمه جدا وهو العمليات الرياضيه التي يجب اتباعها لكي تنجح العمليه ونصل الى الحل الامثل باقل عدد من النقلات , لا حظ ما يلي :
solve ( current, final )
{
1 let max be the number of disks
2 let dest be the final place of max
3 let disk = max
repeat
4 while disk > 0 do
5 if disk is already on dest,
6 or, moving it succeeds then
7 if disk = max then
8 decrement max by 1
9 if max = 0 then
10 return // done
end if
11 let dest be the final place of max
end if
else
12 let dest be the alternative place between dest and
the current place of disk
end if
13 decrement disk by 1
end while
14 let p and q be the places different of dest
15 let disk be the smaller of the disks on top of p and q
16 let dest be the place between p and q with greater disk on top
end repeat
}لنجعل النقاش يبدا من هنا ماذا ترى في هذه الخوارزميه ؟؟؟؟؟؟؟؟؟
تم تعديل هذه المشاركة بواسطة hassan_82 في 28 سبتمبر 2009 في 13:57
الأخ Hassan_82
جزاك الله خيرا، أنا أعرف الخوارزمية جيدا لكن الذي لم أستطع فهمه هو لغة lisp وتطبقاتها، إذا كان هناك مرجع مبسط مع بعض الأمثله
شكرا على اهتمامك
إن لم يكن عون من الله للفتى فأول ما يقضي عليه اجتهاده
ممتاز ... اخي اريد ان انبهك لمعلومه قد لا تكون على معرفه بها وهي ان في هذا المنتديات اقصد عرب تيم يوجد كم هائل جدا من الخبرات لدى الاعضاء وبكل فخر اقولها انك تستطيع ان تحصل على اي معلومه تريد من الاخوه الكرام ,, فبالتالي لكي تحصل على المساعده التي تريد يجب عليك ان تشارك بها او تشرح ما تريد بالضبط والسبب اخي ان هنالك اخوه مبرمجين مثلا ولديهم معلومات وقدره برمجيه ما شاء الله اكثر من الممتاز ولكنهم لا يعلمون بكل تفاصيل الخوارزميات وبعض حيثيات الامور وهذا امر طبيعي لانه لا يوجد منا من هوا كامل فالكمال لله وحده .. فانا كنت اعلم انه لديك معرفه بالخوارزميه ولكنني اردت ان يتشارك الاخوه في المساعده والحل لانني من الممكن ان تفوتني معلومه او نقطه معينه في الحل , فياتي من هو اعلم مني وهم كثر في هذه المنتديات وانا اقلهم علما فيساعدنا في حلها ...
اما موضوع انك تريد حلها برمجيا فهي موجوده على الكثير من المواقع في الانترنت وما عليك الا ان تبحث قليلا , وهذا الامر انا لا احبذه علما بانه سهل جدا ..
على كل انا اسف على هذه المقدمه لانني اريد لك الخير والله اعلم ما الصدور ..
هذه مشاركه لي ارفقت بها ملفات تشرح البرولوغ وبها اشياء قد تفيدك كثيرا ابدا بها وانا في الخدمه ان شاء الله .. وحاول ان تشرك الجميع بما تريد , او بمعنى اخر فكر بصوت عالي لكي تعم الفائده ولكي نساعدك بما تريد ..
واقبل فائق الاحترام