Недавно добавленные исходники

•  DeLiKaTeS Tetris (Тетрис)  4 835

•  TDictionary Custom Sort  6 827

•  Fast Watermark Sources  6 606

•  3D Designer  9 573

•  Sik Screen Capture  6 946

•  Patch Maker  7 393

•  Айболит (remote control)  7 343

•  ListBox Drag & Drop  6 200

•  Доска для игры Реверси  98 193

•  Графические эффекты  7 515

•  Рисование по маске  6 799

•  Перетаскивание изображений  5 654

•  Canvas Drawing  6 032

•  Рисование Луны  5 825

•  Поворот изображения  5 274

•  Рисование стержней  3 866

•  Paint on Shape  3 020

•  Генератор кроссвордов  3 980

•  Головоломка Paletto  3 153

•  Теорема Монжа об окружностях  3 995

 

 

Каталог исходников

   
  Базы данных
  Графика & Мультимедиа
  Сети & Интернет
  Система
  Разное
   

 

 

Delphi Sources

Delphi Sources

 




 

ИСХОДНИК ПРОГРАММЫ

 

. : Ралли (мраморная головоломка) : .

 

Delphi - Головоломка с 32 шариками, раскрашенными и свободно вращающимися по горизонтальной или вертикальной овальной дорожке

Исходник программы, показывающей пример создания головоломки с 32 шариками, раскрашенными и свободно вращающимися по горизонтальной или вертикальной овальной дорожке. Цель состоит в том, чтобы переставить шарики, вращая их так, чтобы 12 красных шариков в центральном квадрате были заменены синими шариками.

Движение головоломки определяется как вращение шариков по вертикальной или горизонтальной траектории в любом направлении на любое количество позиций. Классическое решение требует 10 ходов, однако это далеко от оптимального варианта. Я нашел в сети решение, которое решает головоломку за 3 хода, поэтому предоставляю и вам возможность ее решения в данной игре.

Просмотры: 1 371
Дата: 08.07.2021, Автор: Gary Darby
Скачивания: 19
Написать сообщение:

 

Скачать (14 Кб)     Регистрация >>


 

Похожие исходники


Головоломка

Головоломка Paletto

 

© 2004-2025 "DS"

Соглашение пользователяКонфиденциальностьПравила обработки cookie       BrokenByte Software


Форум по Delphi программированию - Ошибка базы данных

Кажется, произошла проблема с базой данных Форум по Delphi программированию.
Пожалуйста, попробуйте зайти снова, нажав на кнопку Обновить вашего браузера.

Нашей службе технической поддержке был послан email. Вы также можете написать им письмо, если проблема не решиться.

Извените за причинённые неудобства.