Даны координаты левой верхней и правой нижней вершин квадрата. найти координаты точки пересечения диагоналей квадрата.

228

302

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

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

плиз168

Информатика

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

Var x1,y1,x2,y2,x,y: real; begin writeln('введите координаты левой верхней вершины квадрата'); readln(x1,y1); writeln('введите координаты правой нижней вершины квадрата'); readln(x2,y2); x: =x1+(x2-x1)/2; y: =y2+(y1-y2)/2; writeln('координаты точки пересечения диагоналей квадрата: '); writeln('x = ',x,' y = ',y); end. пример: введите координаты левой верхней вершины квадрата 4 3 введите координаты правой нижней вершины квадрата 6 1 координаты точки пересечения диагоналей квадрата: x = 5 y = 2

tat2119

Информатика

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

Var x1,x2,y1,y2: real; begin write('x1 = '); readln(x1); write('y1 = '); readln(y1); write('x2 = '); readln(x2); write('y2 = '); readln(y2); writeln('(',x1+(x2-x1)/2,',',y2+(y1-y2)/2,')') end.