Даны 4 точки a1(x1y1) a2(x2y2) a3(x3,y3) a4(x4,y4) определить будут ли они вершинами параллелограмма информатик
175
361
Ответы на вопрос:
Type point = record x,y: real; end; var vc: array [1..4] of point; bg,nd: point; i,j,k,m: integer; begin writeln('координаты точек - через пробел '); for i: =1 to 4 do begin write('точка ',i,' '); readln(vc[i].x,vc[i].y); end; { сравнение векторов } m: =0; for i: =2 to 4 do begin bg.x: =vc[i].x-vc[1].x; bg.y: =vc[i].y-vc[1].y; j: =1; k: =1; while ((j=1) or (j=i)) do j: =j+1; while ((k=1) or (k=i) or (k=j)) do k: =k+1; nd.x: =vc[j].x-vc[k].x; nd.y: =vc[j].y-vc[k].y; if ((bg.x=nd.x) and (bg.y=nd.y)) or ((bg.x=-nd.x) and (bg.y=-nd.y)) then begin m: =1; break; end; end; if m=1 then writeln('точки образуют параллелограмм') else writeln('точки не образуют параллелограмм'); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
AlinaLove20041331.05.2023 07:17
-
Лейла78617.03.2023 05:22
-
Доминика67155413.10.2022 22:51
-
Валерия336529.09.2021 22:30
-
kirillbatalov230.01.2020 06:35
-
emin55112.03.2022 01:23
-
Хелп1111111111117.04.2020 00:43
-
ellalavrina09.02.2022 23:14
-
ksenchhh14.06.2021 12:45
-
123281522.01.2021 07:01
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.