Две кошки загнали мышь в трубу. Первая кошка находится в точке с координатой x, вторая кошка находится в точке с координатой y, мышь находится в координате z. Определите, какая из кошек первой доберется до мыши, если кошки передвигаются с одной скоростью. В случае если кошки одновременно добираются до мышки, то тогда кошки ссорятся из-за добычи, и мышь ускользает от них. Формат входных данных Единственная строка входного файла содержит три целых числа x, y, z (1 <= x, y, z <= 1 000). Все числа различны. Формат выходных данных Если первая кошка доберется до мышки раньше второй выведите “1” (без кавычек). В случае если вторая кошка доберется до мыши раньше первой выведите “2” (без кавычек). В случае если мышка ускользает выведите “3” (без кавычек).

Вот решение, но сайт его не примет, потому что там нет компилятора с этой версии языка Паскаль.// PascalABC.NET 3.2, сборка 1356 от 04.12.2016// Внимание! Если программа не работает, обновите версию!begin  var x,y,z:integer; Read(x,y,z);  var d1:=abs(z-x); var d2:=abs(z-y);  Writeln(d1>d2?2:d1=d2?3:1)end.