1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| art88 |
12.02.2006 19:59
Сообщение
#1
|
![]() Новичок ![]() Группа: Пользователи Сообщений: 40 Пол: Мужской Реальное имя: Артём Репутация: 0 |
Задача
Изобразить линию сечения правильной шестигранной пирамиды плоскостью, заданной коэффициентами своего уравнения(Основание пирамиды лежит в плоскости XOY, высота совпадает с осью Z) ---------------------------------------------------------- Проблема Подскажите, как лучше потроить усечённую пирамиду, если я знаю взаимное расположение плоскости и каждой грани(точку пересечения или то, что они параллельны или, что грань лежит в плоскости). ---------------------------------------------------------- Программа Рисует пирамиду(DrawPyr), оси координат(DrawAxes), может находить взаимное расположение граней и плоскости(Interception). (См. Pyramid.pas). Прикрепленные файлы
PYRAMID.PAS ( 2.66 килобайт )
Кол-во скачиваний: 239 |
![]() ![]() |
| volvo |
12.02.2006 20:40
Сообщение
#2
|
|
Гость |
art88, погоди... Ты же написал, что
Цитата Программа , и в то же время у тебяРисует пирамиду(DrawPyr) Цитата Проблема ... Подскажите, как лучше потроить усечённую пирамиду |
art88 Трёхмерная графика 12.02.2006 19:59
art88 Процедура DrawPyr рисует пирамиду(не усечённую) с... 12.02.2006 20:44
volvo Ну, попробуй вот это глянуть... Я только что выдра... 12.02.2006 21:34
art88 volovo, насколько я понял твоя программа строит пи... 13.02.2006 18:37
art88 Я нашёл ошибку в Interception, обобщил задачу, реш... 20.02.2006 17:46
volvo art88, я очень глубоко не разбирался, просто сразу... 20.02.2006 18:52
art88 Ну надо же его куда-нибудь поставить. :) Да и воо... 20.02.2006 19:04
art88 Вообще хорошо бы делать MoveTo сразу в первую точк... 20.02.2006 20:41
volvo art88, кажется я понял, в чем ошибка... Я бы на тв... 21.02.2006 16:38
art88 volovo, следуя твоим указаниям я переделал програм... 22.02.2006 20:21
volvo
Нет, ты не следовал моим указаниям, а посему ошиб... 22.02.2006 20:47
art88 И снова здраствуйте....
Вот уже которую неделю, я ... 5.03.2006 14:17
art88 Неужели, ни у кого руки не доходят проверить мою п... 6.03.2006 19:44
volvo art88, ну НЕ НАХОДИТ твоя процедура Interception п... 6.03.2006 20:28
art88 Поменял пару знаков в процедуре interception, убра... 11.03.2006 20:42
volvo Знаешь, почему это происходит? Программа-то может ... 12.03.2006 0:31
art88 Внёс все изменения, действительно что-то чертится,... 12.03.2006 10:47
volvo :dry: Опять начинается... Я же сказал, без Interce... 12.03.2006 10:52
art88 Volvo, извини запостил не ту программу(она вообще ... 12.03.2006 12:19
volvo art88, :blum:
В процедуре PlaneTri:
У меня от... 12.03.2006 12:41
art88 Volvo, прошу прощения за столь тупую ошибкку. :rol... 12.03.2006 15:04
volvo Да, совсем забыл ... Я еще кое-что поменял:
proced... 12.03.2006 15:23
art88 Спасибо, Volvo!
Просто раньше у меня вершина ... 12.03.2006 15:40
art88 Перебрал много плоскотей и пришёл к выводу:
если D... 12.03.2006 16:39
art88 Вобщем теперь я тупо прибавляю eps(некоторая мален... 12.03.2006 17:10
volvo Не особенно-то программа сократилась :(
Ну, ладно,... 12.03.2006 18:03
art88 Volvo, спасибо большое за помощь!
Кстати о дру... 12.03.2006 18:06![]() ![]() |
|
Текстовая версия | 8.12.2025 10:53 |