По заданным координатам точек А и В вычислите длину отрезка АВ Пример входных данных: ха=2 ya=1 xb=10 yb=7 Пример выходных данных: |AB|=10.0

Паскаль:

Var xa,ya,xb,yb:integer;

AB:real;

begin

read (xa,ya,xb,yb);

AB:=sqrt(sqr(xb-xa)+sqr(yb-ya));

Write ('|AB|=',AB:3:1);

end.