Необычная, одноклеточная "Змейка"

@isst · Регистрация: 04.01.2015

Студворк — интернет-сервис помощи студентам

Всем доброго времени суток. Вот попалась такая задачка - про необычную змейку. Там есть поле N на M, змейка всегда "одноклеточная". Точнее там их две - одной управляет один игрок, а другой - второй игрок. Даны начальные координаты змейки a1, b1 (это первая змейка) и a2, b2 - координаты второй змейки. Как я уже говорил, там играют два игрока, так вот нужно определить через какое минимальное кол-во ходов змейки столкнутся.

Я пытался ее решить, написал вот такой код:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
var n, m, a1, b1, a2, b2, a, b, x, y:Longint;
begin
ReadLn(n,m);
ReadLn(a1,b1);
ReadLn(a2,b2);
if (a1>a2) then 
  x:=(N-a1)+(a2-1)
else if (a1=a2) then 
  x:=0    
else 
  x:=(N-a2)+(a1-1);
y:=abs(abs(a1-a2)-1);
if (x<y) then 
  a:=x
else
  a:=y;
if (b1>b2) then 
  x:=(M-b1)+(b2-1)
else if (b1=b2) then 
  x:=0  
else 
  x:=(M-b2)+(b1-1);
y:=abs(abs(b1-b2)-1);
if (x<y) then 
  b:=x
else 
  b:=y;
if (a+b<2) then 
  WriteLn(1) 
else  
  WriteLn(a div 2+b div 2+2)
end.

Но он почему-то не всегда срабатывает правильно. Прошу помочь мне найти ошибки. Заранее спасибо!!!

Добавлено через 22 часа 47 минут
Пли-из, помогите мне!

@grikukan · 09.01.2015, 19:42

isst,
А это случайно не задача с открытой олимпиады?

@isst · 09.01.2015, 19:57 **[ТС]**

grikukan, в этом Мире все возможно!

@grikukan · 09.01.2015, 20:01

isst,

И дисквалификация за нарушение правил тоже...

Поэтому лучше убрать это побыстрее))

@isst · 09.01.2015, 20:06 **[ТС]**

grikukan, я бы рад, да тока на этом форуме, к сожалению, я не могу удалить свой пост :black_eye.:

Добавлено через 36 секунд
grikukan, ну если сможете это сделать, буду благодарен)

Добавлено через 2 минуты
grikukan, а потом, я же сказал, что "все возможно". Вы уверены, что мне эту задачу не педагог Д/О дал решить? А тут я могу спросить знающих людей

@grikukan · 09.01.2015, 20:59

isst,

Ну даже, если вы и не пишите эту олимпиаду, я уверен, на этом форуме полно людей, которые ее пишут.

@APALoff · 10.01.2015, 14:03

По моему, если я правильно понял условия, тут решение в пару строк:
n:=abs(a1-a2)+abs(b1-b2) - общее количество ходов между змейками
Тогда решение, если считать движение каждой змейки за "ход": Writeln((n div 2)+(n mod 2));

@isst · 10.01.2015, 18:46 **[ТС]**

Спасибо-спасибо, ток я ее уже недавно решил

Код скидывать не стану, а то некоторые говорят, что это из олимпиады

Ну если кому ООЧЕНЬ надо - пишите в личку

@Cyborg Drone · 31.01.2015, 21:05

Не по теме:

Сообщение от isst

пишите в личку

Обсуждение по теме вне темы запрещено, в том числе и с использованием системы ЛС. Исключение для платных разделов.

Полагаю, что олимпиада уже кончилась, раз уже Вы решили задачу. По правилам форума, если решение найдено самостоятельно, его следует разместить в теме.

Новые блоги и статьи Все статьи Все блоги /
YAFU@home — распределённые вычисления для математики. На CPU Programma_Boinc 20.01.2026 YAFU@home — распределённые вычисления для математики. На CPU YAFU@home — это BOINC-проект, который занимается факторизацией больших чисел и исследованием aliquot-последовательностей. Звучит. . .	http://iceja.net/ математические сервисы iceja 20.01.2026 Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .	http://iceja.net/ сервер решения полиномов iceja 18.01.2026 Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .	Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь постоянного тока с R, L, C, k(ключ), U, E, J. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа, решает её и находит: токи, напряжения и их 1 и 2 производные при t = 0;. . .
Восстановить юзерскрипты Greasemonkey из бэкапа браузера damix 15.01.2026 Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .	Сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/	WordPad для Windows 11 Jel 10.01.2026 WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .	Classic Notepad for Windows 11 Jel 10.01.2026 Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .

@grikukan 66 / 66 / 54 Регистрация: 23.09.2012 Сообщений: 212
	09.01.2015, 19:42
	isst, А это случайно не задача с открытой олимпиады? 1

@isst 27 / 27 / 29 Регистрация: 04.01.2015 Сообщений: 120
	09.01.2015, 19:57 [ТС]
	grikukan, в этом Мире все возможно! 0

@grikukan 66 / 66 / 54 Регистрация: 23.09.2012 Сообщений: 212
	09.01.2015, 20:01
	isst, И дисквалификация за нарушение правил тоже... Поэтому лучше убрать это побыстрее)) 1

@isst 27 / 27 / 29 Регистрация: 04.01.2015 Сообщений: 120
	09.01.2015, 20:06 [ТС]
	grikukan, я бы рад, да тока на этом форуме, к сожалению, я не могу удалить свой пост :black_eye.: Добавлено через 36 секунд grikukan, ну если сможете это сделать, буду благодарен) Добавлено через 2 минуты grikukan, а потом, я же сказал, что "все возможно". Вы уверены, что мне эту задачу не педагог Д/О дал решить? А тут я могу спросить знающих людей 0

@grikukan 66 / 66 / 54 Регистрация: 23.09.2012 Сообщений: 212
	09.01.2015, 20:59
	isst, Ну даже, если вы и не пишите эту олимпиаду, я уверен, на этом форуме полно людей, которые ее пишут. 1

@APALoff 1648 / 1077 / 1081 Регистрация: 03.07.2013 Сообщений: 4,507
	10.01.2015, 14:03
	Сообщение было отмечено isst как решение Решение По моему, если я правильно понял условия, тут решение в пару строк: n:=abs(a1-a2)+abs(b1-b2) - общее количество ходов между змейками Тогда решение, если считать движение каждой змейки за "ход": Writeln((n div 2)+(n mod 2)); 1

@isst 27 / 27 / 29 Регистрация: 04.01.2015 Сообщений: 120
	10.01.2015, 18:46 [ТС]
	Спасибо-спасибо, ток я ее уже недавно решил Код скидывать не стану, а то некоторые говорят, что это из олимпиады Ну если кому ООЧЕНЬ надо - пишите в личку 0

Необычная, одноклеточная "Змейка"

Решение