![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Регистрация: 27.03.2008
Сообщений: 7
|
![]()
Люди добрые помогить пожалуйста сделать программу в Turbo Delphi 2006.vcl forms application.Я уже неделю мучаюсь сделать эту задачу ничего не получается,мне надо правда сдавать её уже завтра,кто нибудь попробует её сделать до завтра, до 13.00???
я уже все формулы перерыл ну чё то тугодум ![]() ![]() труегольник строю и всё замыкается,а как описать окружность никак. окружность пробовал рисовать через canvas.arc но не могу додумать какие точки надо туда вписывать. Последний раз редактировалось Lion; 27.03.2008 в 19:07. |
![]() |
![]() |
![]() |
#2 |
Новичок
Джуниор
Регистрация: 18.01.2008
Сообщений: 1,720
|
![]()
http://img91.imageshack.us/my.php?image=graphic1ho4.jpg
Появились идеи? Можно ещё решить систему трёх квадратных урвнений. |
![]() |
![]() |
![]() |
#3 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
![]()
Если треугольник существует, то:
1.Находим уравнения двух сторон. 2. Находим уравнения нормалей к этим сторонам, проходящих через середины сторон. 3.Решаем систему из двух уравнений с двумя неизвестными-находим центр окружности. 4.Находим радиус-расстояние от центра до любой вершины. 5.Рисуем окружность. Все формулы в школьном учебнике геометрии, или в любом учебнике по аналитической геометрии. |
![]() |
![]() |
![]() |
#4 |
Регистрация: 27.03.2008
Сообщений: 7
|
![]()
Да это понятно что формулы есть все,а как это организовать в делфи.
Там получаются действительные числа а нужно целые для описания окружности.Может кто нибудь попробует её сделать,плииззз ![]() Напишите код ![]() Последний раз редактировалось Lion; 28.03.2008 в 12:01. |
![]() |
![]() |
![]() |
#5 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
![]()
При описании координат точек применяется функция Round, например
x+round(sin(x))-это целое количество пикселей. |
![]() |
![]() |
![]() |
#6 |
Регистрация: 27.03.2008
Сообщений: 7
|
![]() |
![]() |
![]() |
![]() |
#7 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
![]()
Я то могу ее сделать, но учить вместо тебя геометрию, которую подзабыл, полдня считать координаты за тебя не собираюсь, мне это не интересно.
|
![]() |
![]() |
![]() |
#8 |
Регистрация: 27.03.2008
Сообщений: 7
|
![]() PHP код:
|
![]() |
![]() |
![]() |
#9 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
![]()
ну вы поймите, что вам нужно посчитать для начала центр треугольника!!!! Как - вам рассказал Puporev (смотрите выше...)
То, что Вы написали - никуда не годится. К сожалению, это не так просто, как хотелось бы! ;-( |
![]() |
![]() |
![]() |
#10 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
![]()
Кстати, есть такая книжка:
Название: Программирование в алгоритмах Автор: Окулов С.М. Издательство: Бином Год: 2002 Страниц: 341 она была в сети в эл.виде.. например, попробуйте глянуть тут... Там есть все нужные Вам алгоритмы и формулы (только прийдётся немножко подумать, как их применить). вот, цитирую оттуда: как проверить, можно ли построить треугольник. Даны три отрезка а, b, с. Для существования треугольника с такими длинами сторон требуется одновременное выполнение условий (а+Ь>с), (Ь+с>а) и (а+с>Ь). <...> Три перпендикуляра к сторонам треугольника, проведенные через их середины, пересекаются в одной точке, служащей центром описанного круга. В тупоугольном треугольнике эта точка лежит вне треугольника, в остроугольном — внутри, в прямоугольном — на середине гипотенузы. Его радиус вычисляется по формуле R=(a*b*c)/(4*SQRT(p*(p-a)*(p-b)*(p-c))). где p=(a+b+c)/2 |
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Дан двумерный массив случайных чисел. Построить одномерный из исходного, выбрав из него все числа кратные | ProWinD | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 16.06.2008 20:12 |
Поиск разделяющих вершин в произвольном графе... | Agnazar | Помощь студентам | 4 | 29.05.2008 22:51 |
нарисовать окружность состоящую из 36 разноцветных квадратов | Invisible Hunter | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 29.05.2008 18:03 |
Нужно передвигать окружность с ускорением/ Задачка по Делфи7 | НУБ!!! | Помощь студентам | 4 | 20.05.2008 21:29 |
Сайт был недоступен около 40 часов, официальные причины. | Alar | О форуме и сайтах клуба | 2 | 09.03.2007 16:46 |