Выведите координаты наиболее удаленной от начала координат точки.

Формат входных данных
Программа получает на вход набор точек на плоскости. Сначала задано количество точек n, затем идет последовательность из n строк, каждая из которых содержит два числа: координаты точки. Величина n не превосходит 100, все исходные координаты – целые числа, не превосходящие 103 по абсолютной величине.

Формат выходных данных
Выведите координаты точки, наиболее удаленной от начала координат.

Код программы на паскаль:
var
m, t: Longint;
n, x, y, mx, my: Integer;
begin
ReadLn(n); {m:=0;}
for n:=1 to n do begin
ReadLn(x,y);
t:=Sqr(x)+Sqr(y);
if m<t then begin
m:=t; mx:=x; my:=y;
end;
end;
WriteLn(x,' ',y);
end.