Ввести с клавиатуры координаты двух точек (а и в) на плоскости (вещественный числа). вычислить длину отрезка АВ. программу нужно написать в паскале

Uses crt;var xA,xB,yA,yB,D: real;Begin clrscr; write('Введите координаты точки A через пробел: ');      readln(xA,yA);      write('Введите координаты точки B через пробел: ');      readln(xB,yB);      d:=sqrt(sqr(xA-xB)+sqr(yA-yB));      writeln;      writeln('Длина отрезака AB = ',d:0:3)  End.

//PascalABC.NET//Версия 3.3, сборка 1627beginwrite('координаты точки A: ');var (x1,y1):=ReadReal2();write('координаты точки B: ');var (x2,y2):=ReadReal2();write('|AB|=',sqrt(sqr(x2-x1)+sqr(y2-y1)));end.