VAR
px, py, r: Real;
x1, x2, y1, y2: Real;
BEGIN
Read(x1, y1);
Read(x2, y2);
px := x2 - x1;
py := y2 - y1;
r := Sqrt(px*px + py*py);
Write(r);
END.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.