Рубрика: Программы на Delphi(Делфи)

Игра «Восемь кружков» -Delphi(Делфи)

Имеется восемь кружков. Их начальное положение показано на рисунке. (посередине — пустое поле). первоначальное положение кружков в игреЦель игрока: поменять местами белые и черные фишки за наименьшее число ходов. Любую фишку можно перемещать только на пустое соседнее поле или же через одно занятое поле, опять-таки в пустое. Переводить фишки в другое место нельзя. На любом поле может находиться только одна фишка. NewGame — Процедура, расставляющая все фишки в начальное положение.Move(N) — Функция, переставляющая фишку. Если перестановка невозможна возвращает False.Win — Функция, проверяющая выиграл ли игрок. Если да, возвращает True. Выполняется…

Read More

Заполнить одномерный целочисленный массив размерности n числами, введёнными с клавиатуры. Вставить после максимального элемента массива число, равное удвоенному максимальному элементу массива (считать, что такой элемент единственный). Распечатать полученный массив — Delphi(Делфи)

Read More