Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 08.11.2011, 12:41
Аватар для fofka
fofka fofka вне форума
Начинающий
 
Регистрация: 12.10.2008
Сообщения: 163
Репутация: -1588
По умолчанию Задачка?

Подскажите как пожалста как лучше сделать. Тут возникла задача.
Составить программу которая:
а) запрашивает координаты четырехугольника (в том числе отрицательные и дробные);
б) с помощью геометрических формул проверяет, не является ли данная фигура прямоугольником;
в) выводит результат.

Как то попадалось на глаза что то похожее, не могу найти.
ЗАранее благодарю за советы.
Ответить с цитированием
  #2  
Старый 08.11.2011, 13:25
barsuk228 barsuk228 вне форума
Прохожий
 
Регистрация: 08.11.2011
Сообщения: 5
Репутация: 10
По умолчанию

сравнивай квадраты длин векторов, у тебя 6 векторов, если они попарно равны, то это прямоугольник, даже не длинну векторов а растояние между точками

Последний раз редактировалось barsuk228, 08.11.2011 в 14:08.
Ответить с цитированием
  #3  
Старый 08.11.2011, 14:45
AlexSku AlexSku вне форума
Специалист
 
Регистрация: 07.05.2007
Адрес: Москва
Сообщения: 884
Репутация: 21699
По умолчанию

Цитата:
Сообщение от barsuk228
сравнивай квадраты длин векторов
Причём тут квадраты? Если две величины (длина вектора) равны, то и значения любой функции от них (квадрат, куб, синус...) тоже будут равны.
Ответить с цитированием
  #4  
Старый 08.11.2011, 16:01
barsuk228 barsuk228 вне форума
Прохожий
 
Регистрация: 08.11.2011
Сообщения: 5
Репутация: 10
По умолчанию

Цитата:
Сообщение от AlexSku
Причём тут квадраты? Если две величины (длина вектора) равны, то и значения любой функции от них (квадрат, куб, синус...) тоже будут равны.
просто длинна вектора по формуле изначально идет с корнем, можно просто корень убрать и получится, квадрат длинны
Ответить с цитированием
  #5  
Старый 08.11.2011, 16:35
Аватар для Aristarh Dark
Aristarh Dark Aristarh Dark вне форума
Модератор
 
Регистрация: 07.10.2005
Адрес: Москва
Сообщения: 2,907
Версия Delphi: Delphi XE
Репутация: выкл
По умолчанию

Четырехугольник не является прямоугольником в том случае, если длины его диагоналей не равны.
__________________
Некоторые программисты настолько ленивы, что сразу пишут рабочий код.

Если вас наказали ни за что - радуйтесь: вы ни в чем не виноваты.
Ответить с цитированием
  #6  
Старый 08.11.2011, 16:52
barsuk228 barsuk228 вне форума
Прохожий
 
Регистрация: 08.11.2011
Сообщения: 5
Репутация: 10
По умолчанию

ну так ему и надо сравнивать растояния между четырмя точками, получается 6 линии и если они попарно равны, то это есть прямоугольник
Ответить с цитированием
  #7  
Старый 08.11.2011, 20:20
Аватар для Konrad
Konrad Konrad вне форума
Эксперт
 
Регистрация: 19.03.2009
Сообщения: 1,261
Репутация: 45834
По умолчанию

Цитата:
Сообщение от barsuk228
ну так ему и надо сравнивать растояния между четырмя точками, получается 6 линии и если они попарно равны, то это есть прямоугольник
Нет))) это может быть и не прямоугольник, а ромб например) и т.д.

Вот я не пойму это сейчас всеобщее отупение наступило?
В мое время такое знал каждый троешник...
Сейчас же даже "отличники" могут не знать.
Ответить с цитированием
  #8  
Старый 08.11.2011, 20:33
barsuk228 barsuk228 вне форума
Прохожий
 
Регистрация: 08.11.2011
Сообщения: 5
Репутация: 10
По умолчанию

Цитата:
Сообщение от Konrad
Нет))) это может быть и не прямоугольник, а ромб например) и т.д.

Вот я не пойму это сейчас всеобщее отупение наступило?
В мое время такое знал каждый троешник...
Сейчас же даже "отличники" могут не знать.
Плохо что читаете с трудом,если рассмотреть четырехугольник то там 6 линий, 4 боковых и две диагонали, в прямоугольники должно получится 3 пары одинаковых между собой линий, в ромбе их будет только две пары!!
Ответить с цитированием
  #9  
Старый 09.11.2011, 15:50
Аватар для @Rafa3L
@Rafa3L @Rafa3L вне форума
Начинающий
 
Регистрация: 09.11.2011
Адрес: Москва
Сообщения: 144
Версия Delphi: XE2
Репутация: 11216
По умолчанию

вы геометрию учили?
Ответить с цитированием
  #10  
Старый 09.11.2011, 18:09
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

barsuk228 прав. В ромбе равны все 4 стороны между собой, но НЕ равны диагонали. В прямоугольнике ABCD обязательно выполнятеся:
A_____B
| . . . .|
|_____|
C . . . . D
AB = CD, AC = BD, AD = BC. Вот эти 6 линий, и они попарно равны.
Если в ромбе оказались попарно равны 6 линий, то это уже квадрат => прямоугольник.
Можно и вику спросить.
__________________
jmp $ ; Happy End!
The Cake Is A Lie.

Последний раз редактировалось Bargest, 09.11.2011 в 18:16.
Ответить с цитированием
  #11  
Старый 09.11.2011, 18:58
Аватар для Pilot_Red
Pilot_Red Pilot_Red вне форума
Продвинутый
 
Регистрация: 01.11.2006
Адрес: Карелия
Сообщения: 702
Версия Delphi: D7
Репутация: 11581
По умолчанию

мдааааааа....... что то смотрю пост раздулся, как будто здесь решается
нейрогенонаномат. задача.

Тут вспомнилась одна реальная история моего друга, который работал на стройке. Они строили бассейн одному очень крутому дядьке. Он им сказал строго настрого, чтобы бассейн был строго прямоугольной формы, говорит: "приду, измерю диагонали, и пеняйте на себя, если их длины будут разные"
Угадайте, какой формы они построили бассейн
Ответить с цитированием
  #12  
Старый 09.11.2011, 19:09
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
 
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию

Цитата:
Сообщение от Pilot_Red
Угадайте, какой формы они построили бассейн
Круглый или квадратный?
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
Ответить с цитированием
  #13  
Старый 09.11.2011, 19:11
Аватар для Pilot_Red
Pilot_Red Pilot_Red вне форума
Продвинутый
 
Регистрация: 01.11.2006
Адрес: Карелия
Сообщения: 702
Версия Delphi: D7
Репутация: 11581
По умолчанию

Цитата:
Сообщение от DJ PhoeniX
Круглый или квадратный?

Нееее не круглый, но условия шефа были соблюдены
Ответить с цитированием
  #14  
Старый 09.11.2011, 19:36
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

Как воздушный змей с одинаковыми диагоналями, то есть с точкой пересечения диагоналей не посередине одной из них. Или трапеция с равными диагоналями. Остальные четырехугольники с одинаковыми диагоналями вроде имени не имеют и описать их трудно.
__________________
jmp $ ; Happy End!
The Cake Is A Lie.

Последний раз редактировалось Bargest, 09.11.2011 в 19:47.
Ответить с цитированием
  #15  
Старый 09.11.2011, 19:52
Аватар для Pilot_Red
Pilot_Red Pilot_Red вне форума
Продвинутый
 
Регистрация: 01.11.2006
Адрес: Карелия
Сообщения: 702
Версия Delphi: D7
Репутация: 11581
По умолчанию

Цитата:
Сообщение от Bargest
Как воздушный змей с одинаковыми диагоналями, то есть с точкой пересечения диагоналей не посередине одной из них. Или трапеция с равными диагоналями. Остальные четырехугольники с одинаковыми диагоналями вроде имени не имеют и описать их трудно.

Трапеция!
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 03:12.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025