50 заданы две точки на плоскости х у . составьте программу определяющую какая из них находится ближе к началу кординаткой плоскости. и так далее (только так напишите )

147

479

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

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

аzат

Информатика

4,4(1 оценок)

Program graph; var x1,y1,x2,y2, a, b: real; begin writeln('введите координаты первой точки: '); readln(x1,y1); writeln('введите координаты второй точки: '); readln(x2,y2); a: =(sqr(x1) + sqr(y1)); b: =(sqr(x2) + sqr(y2)); if a < b then writeln('первая точка ближе к началу кординаткой плоскости') else if a > b then writeln('вторая точка ближе к началу кординаткой плоскости') else writeln('обе точки равноудалены') end.