Question

Найти площадь части прямоугольника, лежащей во второй части координатной плоскости, если он задан координатами его вершин. ПАСКАЛЬ!!!! РЕШАТЬ ПРОСТЫМ СПОСОБОМ!!!

Answer 1

Ответ:

Дано: координаты вершин прямоугольника A(x₁, y₁), B(x₂, y₂), C(x₃, y₃), D(x₄, y₄).

Найти: площадь части прямоугольника, лежащей во второй части координатной плоскости.

Решение:

1. Найдем координаты середины прямоугольника M((x₁ + x₃)/2, (y₁ + y₃)/2).

2. Если середина M лежит во второй четверти, то площадь части прямоугольника, лежащей во второй части координатной плоскости, равна площади прямоугольника AMCD. Если же середина M лежит в третьей четверти, то площадь части прямоугольника, лежащей во второй части координатной плоскости, равна площади прямоугольника BMDA.

Код на Pascal:

var

x1, y1, x2, y2, x3, y3, x4, y4, s: real;

begin

writeln('Введите координаты вершин прямоугольника:');

readln(x1, y1, x2, y2, x3, y3, x4, y4);

{находим координаты середины прямоугольника}

var xm := (x1 + x3) / 2;

var ym := (y1 + y3) / 2;

{проверяем, в какой четверти лежит середина}

if (xm < 0) and (ym > 0) then

s := abs(x1 - x3) * abs(y1 - y3) {площадь прямоугольника AMCD}

else if (xm > 0) and (ym < 0) then

s := abs(x2 - x4) * abs(y2 - y4) {площадь прямоугольника BMDA}

else

s := 0; {если середина лежит в других четвертях, то площадь равна 0}

writeln('Площадь части прямоугольника во второй четверти: ', s);

end.