Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Помогите придумать алгоритм. [Delphi, Windows]


Cerberus ©   (2005-05-22 18:31:00) 

Раслажу по полачкам.
Есть матрица 30х30. На ресечении линий может стоять точка. Как опредилить есть ли точкка рядом стой точко что я поставил. Сделал алгоритм что через двойной цикл проходим все возможные кординаты но где ошиься и получается гадость. Помогите составить алгоритм Желательно на примерах(признаю ламерская просьба, но помогите плз).


Cerberus   (2005-05-23 15:19:00) [1]


> 1. Учи литературу. Это поможет тебе грамотно формулировать
> свою мысль.

Я просто пытался пазложить всё по пальцам.
Но народ же понял всем спосибо буду развивать ваши мысли.


П7   (2005-05-23 01:30:00) [2]

Да уж:
1. Учи литературу. Это поможет тебе грамотно формулировать свою мысль.
2. Учи русский. Это поможет грамотно донести сформулировнную мысль до других.

Ну а там глядишь таки вопросы вообще отпадут... (:


Sphinx   (2005-05-22 22:56:00) [3]

дурость, но для узлов сетки может и пойдет, если вопрос правильно понял:
pointIsExsist := True
if not(x[i + 1, j + 1]) then
if not(x[i, j + 1]) then
 if not(x[i + 1, j]) then
  if not(x[i - 1, j - 1]) then
   if not(x[i, j - 1]) then
    if not(x[i - 1, j]) then
     pointIsExsist := False;

x[i,j] - текущая точка, соответственно остальные соседние.


XProger   (2005-05-22 18:40:00) [4]


px := trunc(car.X) div Size;
py := trunc(car.Y) div Size;

Size - размер сетки пропорциональной матрице
(px, py) - элемент матрицы на котором стоит тачка


Наверх

Титульная страница Поиск, карта сайта Написать письмо