|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
17.12.2009, 19:27 | #1 |
Участник клуба
Регистрация: 15.05.2009
Сообщений: 1,222
|
Игра на Pascal (обход в ширину)
Дана такая задача, заданы размеры поля, дана начальная точка и дана конечная точка, необходимо за минимальное количество ходов дойти до конечной точки, причем на поле встречаются препятствия.
s-старт f-финиш .-свододная летка #-припятсвие вот мой код: Код:
Единственное, что ограничивает полет мысли программиста-компилятор
|
17.12.2009, 19:29 | #2 |
Участник клуба
Регистрация: 15.05.2009
Сообщений: 1,222
|
Пример входного файла
8 8 ######## .......# .#####.# .#..S#.# .#.###.# .#.....# .####### .......F Выходной файл: 31 ######## *******# *#####*# *#**S#*# *#*###*# *#*****# *####### *******F Помогите пожалуйста почему-то в выходном файле в первой стоке не выводятся 2 последних значения. Плиз сегодя нужно доделать. Зарание спасибо
Единственное, что ограничивает полет мысли программиста-компилятор
|
17.12.2009, 20:15 | #3 |
Участник клуба
Регистрация: 15.05.2009
Сообщений: 1,222
|
Че никто не знает как?
Единственное, что ограничивает полет мысли программиста-компилятор
|
17.12.2009, 22:10 | #4 |
Удален
Форумчанин
Регистрация: 02.12.2009
Сообщений: 309
|
вот 100% правильное решение методом поиска в ширину:
Код:
20 15 #F...#..#####.. #.......#####.. ......######... ......#####.... .....######.... #......###..... #........#..... #.............. ##.......###... ############... ############... #######..###.## ####.........## ####...#..##### ####.....###### ####......##### ##..........### ##............# ##............S ###..##..###... Пример выхода: 39 #F***#..#####.. #...*...#####.. ....*.######... ....*.#####.... ....*######.... #...***###..... #.....***#..... #.......*****.. ##.......###*.. ############*.. ############*.. #######..###*## ####....*****## ####...#*.##### ####....*###### ####....**##### ##.......***### ##.........***# ##...........*S ###..##..###... Последний раз редактировалось Alex_FF; 17.12.2009 в 23:40. |
18.12.2009, 05:09 | #5 |
Участник клуба
Регистрация: 15.05.2009
Сообщений: 1,222
|
спасибо, но исправила свою, там соовсем небольшой косяк был.
Единственное, что ограничивает полет мысли программиста-компилятор
|
18.12.2009, 18:30 | #6 |
Удален
Форумчанин
Регистрация: 02.12.2009
Сообщений: 309
|
всё-таки я рекомендую использовать моё решение, оно более соответствует теме поиска в ширину, и выглядит лучше...
К тому же я его тестировал на лабиринтах размером 200x200 (на delphi компилировал - в pascal стек переполнится) и оно работает абсолютно правильно. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Обход бинарного дерева в ширину. Delphi 7. | ZhooZhik | Помощь студентам | 4 | 01.12.2011 02:48 |
обход графа в ширину! | КсенияСергеевна | Общие вопросы C/C++ | 0 | 12.12.2009 23:25 |
обход графа в ширину | anemy | Помощь студентам | 0 | 20.11.2009 01:02 |
Обход графа в ширину. | ZhooZhik | Помощь студентам | 1 | 06.04.2009 08:35 |