program pr2; var x,y:array[1..100] of real; i,n:integer; p:real; function l(x1,y1,x2,y2:real):real; begin l:=sqrt(sqr(x2-x1)+(y2-y1)); end; begin readln(n); for i:=1 to n do read(x[i],y[i]); p:=0; for i:=1 to n do p:=p+l(a[i]; writeln(p); end.