الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

[تنبيه - عنوان غير مناسب : ]Hanoi

بدأه newsawal في 27 سبتمبر 2009 · 4 رد · 1,078 مشاهدة · في الرياضيات والخوارزميات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

أرجو المساعدة في كتابة مسألة هانوي (Tower of hanoi(

باستخدام لغة لسب

في الذكاء الاصطناعي

وشكرا

إن لم يكن عون من الله للفتى فأول ما يقضي عليه اجتهاده

#2

الأخ الكريم/الأخت الكريمة

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

مرحباً بكم في منتدى الفريق العربي للبرمجة

نود تنبيهك أن العنوان غير مناسب.

الرجاء اختيار عنوان مناسب أكثر في مواضيعك القادمة، وهذا بمثابة إشعار للأهمية.

وفي حال التكرار سيتعرض موضوعك للإغلاق والحذف!!!

قواعد المشاركة

/index.php?showtopic=29343

شاكرين لكم حُسن تعاونكم

−1

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

bnr025.gif

مـــوقـــعـــى

#3

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

اخي العزيز اولا موضوع ان نكتب هذه الخوارزميه اتوقع انه ليس منطقي والسبب كاننا نقوم بحل واجب ولكن لن نجعلك تغضب منا واتمنى منك في المرات القادمه

ان تشاركنا بما تريد لكي تعم الفائده ., وجزاك الله كل الخير مع كل الاحترام والتقدير لشخصك الكريم

على كل لنشرح ماهي الخوارزميه سويتا , فممكن ان يكون احد الاخوه ما يريد ان يشارك به

__________________

post-168424-1254134546_thumb.jpg

ما معنا هذا الرسم ؟

المطلوب من الرسم السابق هو ان نقوم بنقل الاقراص من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

#4

الأخ Hassan_82

جزاك الله خيرا، أنا أعرف الخوارزمية جيدا لكن الذي لم أستطع فهمه هو لغة lisp وتطبقاتها، إذا كان هناك مرجع مبسط مع بعض الأمثله

شكرا على اهتمامك

إن لم يكن عون من الله للفتى فأول ما يقضي عليه اجتهاده

#5

ممتاز ... اخي اريد ان انبهك لمعلومه قد لا تكون على معرفه بها وهي ان في هذا المنتديات اقصد عرب تيم يوجد كم هائل جدا من الخبرات لدى الاعضاء وبكل فخر اقولها انك تستطيع ان تحصل على اي معلومه تريد من الاخوه الكرام ,, فبالتالي لكي تحصل على المساعده التي تريد يجب عليك ان تشارك بها او تشرح ما تريد بالضبط والسبب اخي ان هنالك اخوه مبرمجين مثلا ولديهم معلومات وقدره برمجيه ما شاء الله اكثر من الممتاز ولكنهم لا يعلمون بكل تفاصيل الخوارزميات وبعض حيثيات الامور وهذا امر طبيعي لانه لا يوجد منا من هوا كامل فالكمال لله وحده .. فانا كنت اعلم انه لديك معرفه بالخوارزميه ولكنني اردت ان يتشارك الاخوه في المساعده والحل لانني من الممكن ان تفوتني معلومه او نقطه معينه في الحل , فياتي من هو اعلم مني وهم كثر في هذه المنتديات وانا اقلهم علما فيساعدنا في حلها ...

اما موضوع انك تريد حلها برمجيا فهي موجوده على الكثير من المواقع في الانترنت وما عليك الا ان تبحث قليلا , وهذا الامر انا لا احبذه علما بانه سهل جدا ..

على كل انا اسف على هذه المقدمه لانني اريد لك الخير والله اعلم ما الصدور ..

/index.ph...&hl=prolog#

هذه مشاركه لي ارفقت بها ملفات تشرح البرولوغ وبها اشياء قد تفيدك كثيرا ابدا بها وانا في الخدمه ان شاء الله .. وحاول ان تشرك الجميع بما تريد , او بمعنى اخر فكر بصوت عالي لكي تعم الفائده ولكي نساعدك بما تريد ..

واقبل فائق الاحترام

مواضيع مشابهة