Даны координаты трех вершин треугольника: (x1, y1), (x2, y2), (x3, y3). Найти его периметр и площадь, (программа Паскаль)
272
455
Ответы на вопрос:
var
x1, y1, x2, y2, x3, y3, AB, AC, BC, p, S: real;
begin
writeln('Введите координаты вершины A: ');
readln(x1, y1);
writeln('Введите координаты вершины B: ');
readln(x2, y2);
writeln('Введите координаты вершины C: ');
readln(x3, y3);
AB := sqrt(sqr(x2 - x1) + sqr(y2 - y1)); { <-- Длина стороны AB }
AC := sqrt(sqr(x3 - x1) + sqr(y3 - y1)); { <-- Длина стороны AC }
BC := sqrt(sqr(x3 - x2) + sqr(y3 - y2)); { <-- Длина стороны BC }
p := (AB + AC + BC); { <-- Периметр треугольника ABC }
writeln;
writeln(' p = ', p:0:2); { <-- Выводим периметр }
p := p / 2; { <-- Находим полупериметр }
{ Площадь треугольника ABC за формулой Герона: }
S := sqrt(p * (p - AB) * (p - AC) * (p - BC));
writeln(' S = ', S:0:2);
readln
end.
x1, y1, x2, y2, x3, y3, AB, AC, BC, p, S: real;
begin
writeln('Введите координаты вершины A: ');
readln(x1, y1);
writeln('Введите координаты вершины B: ');
readln(x2, y2);
writeln('Введите координаты вершины C: ');
readln(x3, y3);
AB := sqrt(sqr(x2 - x1) + sqr(y2 - y1)); { <-- Длина стороны AB }
AC := sqrt(sqr(x3 - x1) + sqr(y3 - y1)); { <-- Длина стороны AC }
BC := sqrt(sqr(x3 - x2) + sqr(y3 - y2)); { <-- Длина стороны BC }
p := (AB + AC + BC); { <-- Периметр треугольника ABC }
writeln;
writeln(' p = ', p:0:2); { <-- Выводим периметр }
p := p / 2; { <-- Находим полупериметр }
{ Площадь треугольника ABC за формулой Герона: }
S := sqrt(p * (p - AB) * (p - AC) * (p - BC));
writeln(' S = ', S:0:2);
readln
end.
Опорно-двигательный аппарат держит ваше тело во время физических нагрузок.
Объяснение:
Опорно-двигательный аппарат состоит из костей, которые служат каркасом для вашего тела и предаёт ему прочность. Без опорно-двигательного аппарата (судя из его названия) вы не могли бы и двигаться, та как мышцы и сухожилия без каркаса это просто мешок
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Другие предметы
-
san4ez7730.09.2020 17:46
-
Amy150311.12.2022 18:13
-
MelliLisska17.09.2022 00:12
-
GgWp221317.01.2022 03:26
-
lianadoschik1225.04.2021 07:13
-
kav200324.10.2021 21:41
-
Kuznecovaalexa200503.05.2021 13:00
-
Vladislav52524526408.12.2020 11:46
-
Elina198725.02.2023 21:18
-
плрол17.08.2022 04:37
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.