Пожалуйста помогите, на паскале 
В одномерном массиве с четным количеством элементов (2N) находятся ко-
ординаты N точек плоскости. Они располагаются в следующем порядке: x1, y1, x2, y2,
x3, y3 и т.д. Определить точку, расстояние от которой до начала координат является
наибольшим.

спасибо, а ты какую формулу исп. ?

Плохо видно? Стандартную. Сумма квадратов координат, квадратный корень извлекать при поиске максимума нет надобности: если максимально подкоренное выражение, то максимален и сам корень.

const  n=10;var  xy:array[1..2*n] of real;  Lmax,L:real;  i,imax:integer;begin  Randomize;  Writeln('Координаты точек');  Lmax:=0;  for i:=1 to n do  begin    xy[2*i-1]:=101*Random-50; { случайное число на [-50..50] }    Write(i:2,xy[2*i-1]:8:3);    xy[2*i]:=101*Random-50;    Writeln(xy[2*i]:8:3);    L:=sqr(xy[2*i-1])+sqr(xy[2*i]);    if Lmax<L then begin Lmax:=L; imax:=i end  end;  Writeln('Наиболее удалена от начала координат');  Writeln('точка A[',imax,'] (',xy[2*imax-1]:0:3,',',xy[2*imax]:0:3,'),');  Writeln('расстояние составляет ',sqrt(Lmax):0:3)end.Тестовое решение:Координаты точек 1  -7.758 -12.799 2  14.569  -5.722 3 -20.827   2.768 4  16.387  35.180 5  43.135 -17.903 6  42.006  11.257 7  40.026  -4.777 8 -32.236  33.900 9 -13.453  45.27110   8.171   7.245Наиболее удалена от начала координатточка A[9] (-13.453,45.271),расстояние составляет 47.227