Есть координаты вершин треугольника. определить, где находится начало координат (внутри треугольника, снаружи или находится на одной из его сторон) для паскаля abc, подскажите самый простой способ кода..
271
421
Ответы на вопрос:
Type txy = record x, y: real end; function sqt(a, b, c: txy): real; begin sqt: =abs((a.x-b.x)*(c.y-b..y-b.y)*(c.x-b.x))/2; end; const eps=1e-4; o: txy = (x: 0; y: 0); var a, b, c: txy; s1, s2, s3: real; begin write('введите координаты вершин треугольника: '); readln(a.x,a.y,b.x,b.y,c.x,c.y); s1: =sqt(o,a,b); s2: =sqt(o,b,c); s3: =sqt(o,a,c); write('центр координат лежит '); if abs(s1)< eps then writeln('на стороне ab') else if abs(s2)< eps then writeln('на стороне bc') else if abs(s3)< eps then writeln('на стороне ac') else if abs(s1+s2+s3-sqt(a,b,c))< eps then writeln('внутри треугольника') else writeln('вне треугольника'); end.
а) var i: integer;
begin
for i:=20 to 35 do writeln (i);
end.
б) var i, a: integer;
begin
read (a);
for i:=a to 50 do writeln (i*i);
end.
в) var i, a: integer;
begin
read (a);
for i:=a to 50 do writeln (i*i*i);
end.
г) var i, b, a: integer;
begin
read (a, b);
for i:=a to b do writeln (i);
end.
Объяснение:
нашёл в интернете, но всё же надеюсь
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
АружанкаЛав04.01.2022 05:04
-
apajcheva16.03.2023 08:09
-
vika208713.05.2022 02:25
-
daniliwotchesi30.09.2020 21:01
-
yulianyaght27.01.2022 08:19
-
Anchoys77731.03.2020 05:47
-
gulnar196419.12.2022 19:37
-
shvffvvfff14.11.2022 22:08
-
hedgehogGreen10.05.2023 11:04
-
borkunovanasta23.01.2020 17:59
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.