Program d1;varx1,x2,y1,y2,d:Real;beginRead(x1);Read(x2);Read(y1);Read(y2);//d:=sqrt(sqr(x2-x1)+sqr(y2-y1));write('Ðàñòîÿíèå ìåæäó òî÷êàìè: ',d);end.
Program d1;
var
x1,x2,y1,y2,d:Real;
begin
Read(x1);
Read(x2);
Read(y1);
Read(y2);
//d:=sqrt(sqr(x2-x1)+sqr(y2-y1));
write('Ðàñòîÿíèå ìåæäó òî÷êàìè: ',d);
end.