Question

Разработайте алгоритм решенияРазработайте алгоритм решения задачи, запишите его в виде блок-схемы. По полученному алгоритму запишите программу на языке Паскаль.
Найдите расстояние между двумя точками с заданными координатами.

Answer 1

var x1,x2,y1,y2:integer;
s:real;
begin
read(x1,y1,x2,y2);
s:=sqrt(sqr(x1-x2)+sqr(y1-y2));
writeln(s:3:2);
end.