IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Конкурс на решение задачи!, Переправа через реку... ну очень широкую
APAL
сообщение 24.01.2005 15:19
Сообщение #1


Смотрю...
*****

Группа: Модераторы
Сообщений: 1 055
Пол: Мужской
Реальное имя: Пшеничный Алексей Анатольевич

Репутация: -  6  +

Каюсь, иногда играю в комп. игры. И вот в "Космических рейнджерах" был квест с этой задачкой:

Дано:
Река, лодка вместимостью 2 человека, два берега.
Условия:
На одном берегу 4 человека. Первый может проплыть на лодке на другой берег за 1 час, второй за 2 часа, третий за 5 часов, четвертый за 10 часов. Если в лодке два человека то она проплывет за время "самого медленного пассажира".
Задача:
Необходимо перевести всех людей на другой берег не более чем за 18 часов!

Сходу решить мне не удалось - написал на Паскале. Квест прошел.
Свой вариант выложу по окончанию времени конкурса.

Условия конкурса:
Свои решения присылать на "мыло": apalprival @ narod . ru.
Срок проведения 2 недели, т.е. до 7 февраля 2005 г. (это еще можно обсудить)

Номинации:
1. Самое первое правильное решение.
2. Самое короткое-оптимальное решение.
3. Самое изощренное решение.

Каждому победителю +1 к повышению рейтинга на форуме.

Свои решения присылайте в архивированном виде! И не забудьте включить в архив исполняемый модуль (*.EXE), дабы избежать конфликтов компиляторов.


--------------------
Если что-то не делает того, что вы запланировали ему делать - это еще не означает, что оно бесполезно.
--------------------
Прежде, чем задать вопрос - Правила :: FAQ :: Поиск
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
  Ответить  Открыть новую тему 
Ответов
Altair
сообщение 24.01.2005 16:22
Сообщение #2


Ищущий истину
******

Группа: Модераторы
Сообщений: 4 824
Пол: Мужской
Реальное имя: Олег

Репутация: -  45  +

Опровержение такой возможности: (ИМХО)

Скрытый текст
Если переправить троих человек - 2,5 и 10 часовых , то только ОТПРАВКА ИХ НА ТОТ БЕРЕГ будет занимать 2+5+10 часов =17 часов.
А лодку еще надо возвращать обратно 2 раза.
А в случае если поедут двое напрмиер 10+5 то обратно 5 часов возварщаться...
Итого минимум 19 часов.
вот доказательство на Паскале:

КОД:(в теги не заключать - пропадет невидимость!)

var
a:array[1..4] of byte;
i,j,k,l,time:byte;
Function max(a,b:byte):byte;
begin if a>b then max:=a else max:=b end;
begin
a[1]:=1; a[2]:=2; a[3]:=5; a[4]:=10;

For i:=1 to 4 do
 for j:=1 to 4 do
  for k:=1 to 4 do
   for l:=1 to 4 do
   begin
   If (i<>j)and(i<>k)and(i<>l)and(j<>k)and(j<>l)and(k<>l) then
    begin
     time:=max(a[i],a[j])+a[i]+ {ЇҐаҐўҐ§«Ё 1®Ј® ўҐа­г«Ёбм}
           max(a[i],a[k])+a[i]+ {ЇҐаҐўҐ§«Ё ­  в®в ЎҐаҐЈ ўв®а®Ј® 祫 }
           max(a[i],a[l]);
     If time<=18 then writeln(i,' ',j,' ',k,' ',l,' time = ',time);
    end
   end
end.


--------------------
Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
APAL   Конкурс на решение задачи!   24.01.2005 15:19
Altair   Опровержение такой возможности: (ИМХО)
 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

- Текстовая версия 20.07.2025 18:21
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"