Program pr1;
var x1, y1, x2, y2: integer;
begin
writeln('x1, y1, x2, y2');
readln(x1,y1,x2,y2);
writeln('Длина ', sqrt(sqr(x2-x1)+sqr(y2-y1)));
end.