چیدن 8 وزیر

[دلفی3000]

سلام به برنامه نویسان عزیز

چگونه میتوان 8 وزیر را در صفحه شطرنج طوری قرار داد که هیچ کدام یکدیگر را
نزنند ؟

والا من که توش موندم به مولا... :oops: :oops:

[DelphiMaster]

این سوالیه که معمولا اساتید برنامه سازی مطرح می کنند،درسته؟
خوب به جای این که source code رو واست بنویسم،یه توضیحی میدم تا خودت اونو بنویسی،OK?
خوب اول باید یه جوری خونه های شطرنج رو شبیه سازی کنی،چی به فکرت میرسه؟
درسته ، یه آرایه 8 در 8 ؛

Var

 ChessArray : array [1..8,1..8] of Integer{you can also use char}

خوب وقتی یه وزیر رو تو صفحه قرار بدی چند جور خونه رو می تونه در اطراف خودش بزنه؟
اون خونه ها رو با یک پر کن و باق رو با صفر.
از

If...then...else

استفاده کن.
خوبه که بدونی مجموعا 92 حالت ممکن وجود داره!(اگه درست یادم باشه).
موفق باشی.

[arianexpress]

یک سری هم به لینک زیر بزن که در اونجا سوال پرسیده بودی :

http://www.arianexpress.com/delphi/viewtopic.php?t=60

[Mohammad_Mnt]

من هم یه بار با سی این برنامه رو نوشتم . فکر کنم همون 92 حالت می شد . راهنمایی بالا خیلی خوبه 8)

[دلفی3000]

منظور شما کدوم جواب است؟

[Mohammad S]

اگه یه جوابشو می خوای اینه که میگم
ولی اگه برنامه شو می خوای باید خودت بنویسی
از سمت چپ و بالا به ترتیب ردیف ها:
ردیف اول، ستون 5
ردیف دوم، ستون 1
ردیف سوم، ستون 4
ردیف چهارم، ستون 6
ردیف پنجم، ستون 8
ردیف ششم، ستون 2
ردیف هفتم، ستون 7
ردیف هشتم، ستون 3
موفق باشی
8)