Какое минимальное расстояние должен проплыть Халк чтобы выбраться из бассейна на бортик? - Pascal

Формулировка задачи:

Халк плавал в бассейне размером N и M метров и устал. в этот момент он обнаружил, что находится на расстоянии X метров от одного из длинных бортиков (не обязательно от ближайшего) и Y метров от одного из коротких бортиков. Какое минимальное расстояние должен проплыть Халк чтобы выбраться из бассейна на бортик? Формат входных данных 4 натуральных числа: n, m, x, y (n<>m) , разделенные пробелами. Все числа не превосходят 10000. Формат выходных данных Одно число - минимальное расстояние, которое должен проплыть Халк, чтобы выбраться на бортик.

Решение задачи: «Какое минимальное расстояние должен проплыть Халк чтобы выбраться из бассейна на бортик?»

textual
                            Листинг программы 
                        

                            var
  n, m, x, y, t, min: integer;
begin
  read(n, m, x, y); 
  // Меняем местами, чтобы N <= M
  if n > m then begin 
    t := n;
    n := m;
    m := t;
  end;
  min := x;
  if min > n - x then min := n - x;
  if min > y then min := y;
  if min > m - y then min := m - y;
  write(min);
end.
                        