===== PascalABC.NET =====
begin
var (x1, y1) := ReadInteger2('Введи x1 и y1:');
var (x2, y2) := ReadInteger2('Введи x2 и y2:');
Print(Round(Sqrt(Sqr(x2 - x1) + Sqr(y2 - y1))))
end.
