Задача 4: Станция На трёх путях сортировочной - вопрос №133459754 от ipolevoy1 03.02.2023 17:28

Question

Информатика: Задача 4: Станция На трёх путях сортировочной станции стоят вагоны с абрикосами (А), бананами (Б) и вишней (В) так, как это показано на рисунке. Машинист тепловоза (Т) может за один раз прицепить к тепловозу один или несколько вагонов с какого-нибудь пути, передвинуть их на правый путь, после чего передвинуть их на любой левый путь. Например, если тепловоз заберет 2 вагона с пути номер 3 на путь номер 1, то после такого действия распределение вагонов по путям будет таким. А В Б А В Б В А Б Соответствующую

ipolevoy1 · Answer

В основе лежит формула определения расстояния между двумя точками в прямоугольной системе координат, при этом одна из точек совпадает с началом системы координат. В этом случае искомое расстояние определяется по формуле:
$L= \sqrt{a_x^2+a_y^2}$
Поскольку в задаче не ставится вопрос определения самого расстояния, достаточно для каждой точки вычислить значение L² и сравнить их.
Окончательно задача сводится к нахождению минимального из значений
a_x^2+a_y^2

по заданным координатам х и у.

var
ax, ay, bx, by, rx, ry: real;

begin
writeln('Введите координаты первой точки');
readln(ax, ay);
writeln('Введите координаты второй точки');
readln(bx, by);
rx := sqr(ax) + sqr(ay);
ry := sqr(bx) + sqr(by);
if rx < ry then writeln('Первая точка ближе')
else
if rx > ry then writeln('Вторая точка ближе')
else writeln('Обе точки равноудалены')
end.