﻿var
    L,L1,L2,L3:real;
    x1,x2,x3,x4, y1,y2,y3,y4:real;
    
begin
  write('Введите координаты X1, Y1: ');
  readln(x1,y1);
  write('Введите координаты X2, Y2: ');
  readln(x2,y2);
  write('Введите координаты X3, Y3: ');
  readln(x3,y3);
  write('Введите координаты X4, Y4: ');
  readln(x4,y4);
  
  L1:=sqrt( (x2-x1)*(x2-x1) + (y2-y1)*(y2-y1) );
  L2:=sqrt( (x3-x2)*(x3-x2) + (y3-y2)*(y3-y2) );
  L3:=sqrt( (x4-x3)*(x4-x3) + (y4-y3)*(y4-y3) );
  L := L1 + L2 + L3;
  writeln(L);

end.