Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

ExCode.ru - программирование на высоком уровне - выпуск 24


Информационный Канал Subscribe.Ru

ExCode.ru - программирование на высоком уровне
Выпуск №24 ( 2006.01.21 )
Здравствуйте, уважаемые подписчики!

Хочу сообщить вам, что наш сайт в скором времени будет выпускать online журнал для программистов, в связи с чем приглашаю всех желающих поучаствовать в проекте. Ждем вас на нашем форуме


Новости копьютерного мира:
2006-01-18    Microsoft Internet Explorer 7.0 копирует FireFox
Бета-версия Microsoft Internet Explorer 7.0, представленная публике на выставке CES 2006, до удивления схожа со своим главным конкурентом - FireFox.

2006-01-18    Билл Гейтс увеличил свою долю акций в Berkshire Hathaway
Билл Гейтс недавно серьезно увеличил свою долю акций в страховой компании Berkshire Hathaway. Им было куплено 70 новых акций на сумму в $6,2 млн. Таким образом на сегодня ему принадлежит доля в компании равная $390,6 млн., что соответствует 4 350 акциям Berkshire.

2006-01-18    Калифорнийский суд вынес постановление по делу Microsoft "о переплате"
Групповой иск, поданный жителями Калифорнии в адрес компании Microsoft, обвиняемой в завышении цен на свои продукты, закончился победой истцов.

2006-01-18    Google запускает "мобильную" стартовую страницу
Компания Google вслед за конкурентами, Yahoo и Microsoft, объявила о запуске "мобильной страницы".

2006-01-18    Google пророчат рост акций до $2 000 за единицу
Впечатляющую цифру предполагаемого роста акций компани Google выдал один из аналитиков компании Caris and Co, Марк Сталмэн (Mark Stahlman). По его прогнозу в ближайшем будущем акции Google достигнут, а возможно и перевалят отметку в $2000.

2006-01-18    Разработчики Apache выпустили Java-сервер Geronimo 1.0
Разработчики Apache, одного из самых популярных на сегодня интернет-серверов, обеспечивающих работу значительной части интернет-сайтов, выпустили Java-сервер Apache Geronimo 1.0.

2006-01-18    Microsoft рискует потерять блоггеров
Компания Microsoft продолжает подвергаться нападкам за потакание цензуре Китая.

2006-01-18    За Google Talk требуют патентных отчислений
Компанию Google вновь тянут в суд. На этот раз претендентом на кусок чужого пирога оказалась компания Rates Technology.

2006-01-18    Microsoft отстояла патент на файловую систему FAT
Недавно Общественная патентная организация PUBPAT (The Public Patent Foundation) потребовала от Патентного бюро США и бюро торговых марок USPTO (The United States Patent & Trademark Office) проверить правомерность владения компанией Microsoft патентами на файловую систему FAT.

2006-01-18    Вышел новый CorelDRAW
Вышло давно ожидаемое многими обновление пакета приложений для работы с графикой от компании Corel. В состав CorelDRAW Graphics Suite X3 входят программы: редактор векторной графики CorelDRAW X3, редактор растровой графики PHOTO-PAINT X3, приложение для работы с изображениями в формате Raw Pixmantec RawShooter, программа для создания скриншотов Corel CAPTURE X3, а также электронная книга по работе с пакетом CorelDRAW Handbook.

Статья номера:

Шахматный конь


Вывести последовательность ходов шахматного коня, который
обходит доску, посещая каждую клетку по одному разу, если это
возможно.

Ставим коня в произвольную клетку на доске. Из любой клетки
конь имеет не более 8 вариантов для продолжения своего пути,
причем направления этих путей для любой клетки известны.
Поочередно переставляя коня на различные позиции, ищем такую,
которая удовлетворяет условию, что ранее конь на ней не был.
Есди таких вообще позиций нет, то возвращаемся на предыдущую
клетку и так далее.
Таким образом продолжаем движение, пока не будет пройдена вся доска.


{$APPTYPE CONSOLE}
const n=8;d=64;
way:array[1..8,1..2]of -2..2=
((-2,1),(-1,2),(1,2),(2,1),(2,-1),(1,-2),(-1,-2),(-2,-1));
{Таким образом задается, куда может сделать следующий ход
конь с текущей позиции}

var i,j,m:1..n;
board:array[1..n,1..n]of boolean;
{Здесь отмечаем клетки, на которых конь уже был}
route:array[1..d,1..2]of char;
{Запоминание координат маршрута "жеребца"}

procedure print;
var i:1..d;
begin writeln('The Chess Horse');
for i:=1 to d do write(route[i,1],route[i,2],' ');
readln;halt;end;

procedure inspector(p1,p2:integer);
var y,j,i:byte;
begin if m=d then print;
{Если конь сделал 64 "успешных" хода значит вся доска пройдена}
for y:=1 to 8 do begin
i:=p1+way[y,1];j:=p2+way[y,2]; {Шагаем копытом на следующую клетку}
if(i in[1..n])and(j in [1..n])and not(board[i,j])then
begin inc(m);
route[m,1]:=chr(64+i);
route[m,2]:=chr(48+j);
board[i,j]:=true; {Перебор с возвратами}
inspector(i,j);
dec(m);
board[i,j]:=false;
end;
end;
end;

begin
for i:=1 to n do
for j:=1 to n do board[i,j]:=false;
i:=1;j:=1;//readln(i,j);
{Координаты можно и вводить, но далеко не факт, что
путь такой есть и "жеребец" не заблудится. В этом случае программу
нужно завершать извне, так как она зациклится. А можно написать
маленькую функцию проверки на зацикливание и вставить ее
в начало inspector. Но вданном примере целью было показать ход решения.}
m:=1;
route[m,1]:=chr(64+i);
route[m,2]:=chr(48+j);
board[i,j]:=true;
inspector(i,j);end.


Новые статьи на сайте ExCode.ru:
НазваниеРаздел
Шахматный коньЗадачи » С решениями
Что такое формы и для чего они нужныWeb
Абсолютный и относительный путь к сценариюWeb
Метод POST и формыWeb
CGI изнутриWeb
Передача документа пользователюWeb
Пример CGI-сценарияWeb
Передача информации CGI-сценариюWeb
Передача параметров методом GETWeb
Передача параметров методом POSTWeb
Расшифровка URL-кодированных данныхWeb
ФормыWeb
Тэг <input> — различные поля вводаWeb
Загрузка файловWeb
Тэг загрузки файла (file)Web
Что такое Cookies и с чем их едятWeb
Установка CookieWeb
Получение Cookies из браузераWeb
Пример программы для работы с CookiesWeb
АвторизацияС / С++
Зачем нужен домашний серверWeb
Реализация keylogging под WIN32С / С++
Программный поиск файловDelphi/Pascal » Общие
Меню и акселераторыС / С++
Оперативная памятьAssembler
Ведущий рассылки: LedWorm
© ExCode.ru 2005

Subscribe.Ru
Поддержка подписчиков
Другие рассылки этой тематики
Другие рассылки этого автора
Подписан адрес:
Код этой рассылки: comp.soft.prog.excode
Архив рассылки
Отписаться Вебом Почтой
Вспомнить пароль

В избранное