задачи на сортировку...

[Oda33]

1)Несколько однотипных спасательных катеров, находящихся в акватории в точках с координатами (xi , yi ), i = 1, 2, ..., N, получили сигнал SOS от судна, находящегося в той же акватории в точке с координатами (x0 , y0 ). Определите, какой из катеров быстрей других сможет оказать помощь?
2)По данным о расписании движения пригородных поездов определите значение наибольшего интервала времени между отправлениями поездов.


Помогите пожалуйста..

[Mad_Cat]

1)

k:=1;
for i:=2 to n do
if sqrt(sqr(x[i]-x0)+sqr(y[i]-y0))<sqrt(sqr(x[k]-x0)+sqr(y[k]-y0)) then k:=i;
end;

2)

k:=a[2]-a[1];
for i:=3 to n do 
if a[i]-a[i-1]> k then k:=a[i]-a[i-1];