type
pct=record
     x,y:-1000000000..1000000000;
     end;
int=1..100000;
pcte=array[1..100] of pct;
var k:pcte; a,b:pct;
    n,i,j:int;t,g:text;d:extended;

begin
assign(t,'cmap.in');reset(t);
assign(g,'cmap.out');rewrite(g);
readln(t,n);
for i:=1 to n do begin readln(t,k[i].x,k[i].y);writeln(k[i].x,' ',k[i].y);end;
d:=sqrt(sqr(k[1].x-k[2].x)+sqr(k[1].y-k[2].y));
for i:=1 to n do
for j:=i+1 to n do if d>sqrt(sqr(k[i].x-k[j].x)+sqr(k[i].y-k[j].y))then begin
d:=sqrt(sqr(k[i].x-k[j].x)+sqr(k[i].y-k[j].y));
a:=k[i];
b:=k[j];
end;
write(g,sqrt(sqr(a.x-b.x)+sqr(a.y-b.y)):4:6);

close(t);close(g);
readln;end.