Даны две точки на числовой оси с координатами х и у. определить, какая из них ближе к нулю

Begin

Read(x1,y1);

Read(x2,y2);

If x2*x2+y2*y2>x1*x1+y1*y1 then

Write('первая точка ближе к нулю')

Else

Write('вторая точка ближе к нулю')

End.

Объяснение:

Нужно применить теорему Пифагора, где мы будем искать гепотенузу, зная катеты(х и у)