Question

Отметьте задачу, которую решает следующая программа:
var х1, у1, х2, у2, d1, d2: real;
begin
writeln (‘Введите А (Х1, Y1) и В (Х2, Y2)’);
readln (х1, у1, х2, у2);
d1:=sqrt(sqr(y1)+sqr(x1));
d2:=sqrt(sqr(y2)+sqr(x2));
if d1>d2 then writeln (‘Точка А’)
else if d1<d2 then writeln (‘Точка В’)
else writeln (‘Одинаково’);
end.

Answer 1

Какая точка дальше лежит от центра координат! Или они равноудалены