Даны 4 точки a1(x1,y1), a2(x2,y2), a3(x3,y3), a4(x4,y4). определить, будут ли они вершинами параллелограмма. нужно решить на pascal, но без использования мудренных команда.

228

389

Посмотреть ответы 2

Ответы на вопрос:

Yalikhan

Информатика

4,4(28 оценок)

Var x1, x2, x3, x4, y1, y2, y3, y4: real; function vectorlength(x1, y1, x2, y2: real): real; begin vectorlength : = sqrt(sqr(x1 - x2) + sqr(y1 - y2)); end; function vectorslope(x1, y1, x2, y2: real): real; begin vectorslope : = (y1 - y2) / (x1 - x2); end; begin readln(x1, y1); readln(x2, y2); readln(x3, y3); readln(x4, y4); if (vectorlength(x1, y1, x2, y2) = vectorlength(x4, y4, x3, y3)) and (vectorslope(x1, y1, x2, y2) = vectorslope(x4, y4, x3, y3)) then writeln('yes') else writeln('no'); end.

vda200311

Информатика

4,4(15 оценок)

графические редакторы и системы управления базами данных

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.