Пусть даны координаты вершин четырехугольника. Составьте программку, которая определяла

Пусть даны координаты вершин четырехугольника. Составьте программку, которая определяла бы,являеться ли этот четырехугольник прямоугольником.

Задать свой вопрос
Милана Новохатная
А так же то что скалярное творенье векторов в декартовой системе координат можно посчитать через их координаты.
Владислав Шалтенис
это процесс прогримирования,решение задач через язык паскаля
Янчакс Денис
Это понятно, а как вы не расписав маттем. модель собираетесь это делать?
София Марданова
можите, на языке паскаль написать...
Таисия
А вот когда у вас будет определён порядок вычислений и все формулы хоть ассемблером кодируйте
Студило Галина
я отдал для вас вопрос,поставьте любые числа..
Диана Гайман
В любом случае не сейчас. Ибо на работе я. Пока после еще одного слоя намотки размялся. Попробуйте сами путь для вас указан. Если успею, наберу вечерком.
Геннадий
хорошо
Denis
Кстати, если порядок нормальный, сможете просто сопоставить диагонали. У прямоугольника они одинаковы.
Никита Федяхин
И точкой скрещения обязаны делиться пополам.\
1 ответ
Глядите. Здесь правда есть немного излишнего.  Противоположные стороны всё таки инспектировать не надобно. Хватит 4х углов. Но текст комментирован, излишнее можно убрать.  объясняющих картинок нет. но вопрос и так слишком длинно живёт без ответа. Мне казалось срок жизни 2-3 дня максимум, а здесь 5 дней минуло.
Если что, отправляйте на исправление. дома дорисую.
Основное программка работает. Правда есть недоверья, что не во всех Паскалях (как они относятся к объявлению массива массивов?)
Это был Free Pascal Compiler version 2.6.4 [2014/04/20] for i386
В версии 3.0.0. мыслю, тоже сработает

P.S.Добавил вероятные варианты (не все, ясное дело) расположения точек.


Арина Немшевич
Хоть это и не главно . Но есть ошибка при сопоставленьи сторон. Строки 155 и 165. там модуль вектора v1 сравнивается сам с собой.
Anton Goga
Если хтим сравнивать, Верно должно быть: if AbsVecPlane(v1)<>AbsVecPlane(v2)
Аля
спасибо для тебя
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт