Найти длину отрезка по данным координатам, длина до 3 знаков после точки

@Vanya22 · Регистрация: 21.01.2016

Найдите длину отрезка, если заданы координаты начала и конца данного отрезка. Ввести одной строке через один пробел 4 целых числа координаты начала и конца отрезка x1,y1,x2,y2 (-2000<= x1,y1,x2,y2<=2000). Вывести одно число - длину отрезка с точностью до 3 цифр в дробной части.

Pascal

Program nn;
Var x1,x2,y1,y2,d:Real;
Begin
Readln(x1,y1,x2,y2);
    d:=sqrt(sqr(x2-x1)+sqr(y2-y1));
    
    Writeln(d);
End.

Не знаю, как ограничить возможные значения и узнать 3 знака в дробной части.

@Puporev · 21.01.2016, 12:19

Pascal

1
2
3

Read(x1,y1,x2,y2);//вводим 4 числа через пробел типа 100 250 30 58, нажимаем Enter
d:=sqrt(sqr(x2-x1)+sqr(y2-y1));
Writeln(d:0:3);

Опции темы