Длина отрезка АВ равна длине соответсвующего вектора АВ. Найдём координаты вектора АВ. Это будут хb-xa по х и yb-ya по у. Для нас это 10-2=8 по х и 7-1= 6 по у. Длина вектора АВ - это квадратный корень из суммы квадратов его координат. То есть, это квадратный корень из (8² + 6²) = квадратный корень из (64 + 36)= квадратный корень из 100= 10.
xa, ya, xb, yb: integer;
begin
read(xa, ya);
read(xb, yb);
writeln('|AB| = ', sqrt(sqr(xa - xb) + sqr(ya - yb)));
end.