Даны три стороны одного и три стороны другого треугольника. эти треугольники равновеликие, т.е. имеют равные площади. решить в системе паскаль
167
245
Ответы на вопрос:
Var a, b, c, p,s,s1: real; begin write('введите три стороны треугольника: '); read(a, b, c); p : = (a + b + c) / 2; s : = sqrt(p * (p - a) * (p - b) * (p - c)); write('введите три стороны другого треугольника: '); read(a, b ,c); p : = (a + b + c) / 2; s1 : = sqrt(p * (p - a) * (p - b) * (p - c)); write('треугольники равновеликие -- ', s = s1) end.
Program d1kpxx13; uses crt; var a1,a2,a3,b1,b2,b3,s1,s2,p1,p2: real; begin readln(a1,a2,a3); p1: =(a1+a2+a3)/2; s1: =p1*(p1-a1)*(p1-a2)*(p1-a3); readln(b1,b2,b3); p2: =(b1+b2+b3)/2; s2: =p2*(p2-b1)*(p2-b2)*(p2-b3); if s1=s2 then writeln('ravnovelikie') else writeln(' ne ravnovelikie'); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
VadAltman1310.03.2022 02:27
-
nazfire200317.03.2023 22:30
-
amhadovmalik19.02.2022 22:29
-
politovatanya115.03.2023 01:03
-
vilrimma27.05.2023 19:46
-
shingekinokoyji11.11.2022 11:10
-
BlueSubaru66613.09.2021 02:07
-
viki04030202.08.2021 03:07
-
диана246711.08.2021 07:21
-
Dote822808.08.2021 03:06
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.