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

300

500

Посмотреть ответы 3

Ответы на вопрос:

kocmoc505

Информатика

4,7(5 оценок)

Program tocka; var a,b,c: real; begin writeln('введите две точки'); readln(a,b); if (abs(a)< abs(b)) then writeln('ближе точка ', a); if (abs(a)> abs(b)) then writeln('ближе точка ', b); if (abs(a)=abs(b)) then writeln('они равноудалены '); end.

Kamilkamilka222

Информатика

4,6(94 оценок)

Var xa,ya,xb,yb,d2a,d2b: real; begin write('введите координаты (x,y) точки а: '); readln(xa,ya); write('введите координаты (x,y) точки b: '); readln(xb,yb); d2a: =sqr(xa)+sqr(ya); d2b: =sqr(xb)+sqr(yb); if d2a< d2b then writeln('точка а расположена ближе к началу координат') else if d2b< d2a then writeln('точка b расположена ближе к началу координат') else writeln('обе точки равноудалены от начала координат') end. тестовое решение: введите координаты (x,y) точки а: 5 -3.7 введите координаты (x,y) точки b: -4.2 3.8 точка b расположена ближе к началу координат