Номер 6. Информатика ,9 класс Помогите ,пожалуйста
Var x1, y1, x2, y2: integer; begin Readln(x1, y1); Readln(x2, y2); Writeln(sqrt(sqr(x2 - x1) + sqr(y2 - y1))); end.