 Линза, Помогите нарисовать линзу! |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
  |
| ODVk |
 21.01.2011 19:19
Сообщение
#1
|
|
Группа: Пользователи Сообщений: 4 Пол: Мужской Репутация:  0   |
.
Сообщение отредактировано: ODVk - 23.01.2011 20:10 |
   |
 
|
| Lapp |
21.01.2011 20:38
Сообщение
#2
|
 Уникум  Группа: Модераторы Сообщений: 6 823 Пол: Мужской Реальное имя: Лопáрь (Андрей) Репутация: 159 |
Цитата(ODVk @ 21.01.2011 19:19)  Пожалуйста, помогите нарисовать линзу, но чтобы радиус вводил пользователь  (не получается соединить две дуги и чтобы они равны были по высоте, если радиусы разные(может быть я вообще не с того начал?;))) в конечном счёте буду расчитывать ход лучей через объективы) Я не понимаю. Две дуги, совпадающие на концах (да?), равные по высоте, но разных радиусов? Боюсь, такого не может быть.. Или я что-то не так понял? рисунок от руки помог бы весьма.. -------------------- я - ветер, я северный холодный ветер
я час расставанья, я год возвращенья домой |
|
|
|
| ODVk |
21.01.2011 21:14
Сообщение
#3
|
|
Группа: Пользователи Сообщений: 4 Пол: Мужской Репутация: 0 |
.
Сообщение отредактировано: ODVk - 23.01.2011 20:10 |
|
|
|
| TarasBer |
21.01.2011 21:30
Сообщение
#4
|
 Злостный любитель Группа: Пользователи Сообщений: 1 755 Пол: Мужской Репутация: 62 |
Эти дуги имеют разные угловые величины, а ты в коде пишешь им одинаковые (от 120 до 240).
-------------------- |
|
|
|
| ODVk |
21.01.2011 21:35
Сообщение
#5
|
|
Группа: Пользователи Сообщений: 4 Пол: Мужской Репутация: 0 |
.
Сообщение отредактировано: ODVk - 23.01.2011 20:10 |
|
|
|
| TarasBer |
21.01.2011 21:39
Сообщение
#6
|
|
Злостный любитель Группа: Пользователи Сообщений: 1 755 Пол: Мужской Репутация: 62 |
В общем для двояковыпуклой линзы для радиусов r1 и r2
координаты центров будут x1 := Width div 2 + sqrt(sqr(r1)-sqr®) и x2 := Width div 2 - sqrt(sqr(r2)-sqr®) а углы будут +-arctg(R/x1) и 180+- arctg(R/x2); -------------------- |
|
|
|
| ODVk |
21.01.2011 21:45
Сообщение
#7
|
|
Группа: Пользователи Сообщений: 4 Пол: Мужской Репутация: 0 |
.
Сообщение отредактировано: ODVk - 23.01.2011 20:10 |
|
|
|
| TarasBer |
21.01.2011 21:49
Сообщение
#8
|
|
Злостный любитель Группа: Пользователи Сообщений: 1 755 Пол: Мужской Репутация: 62 |
Для вогнуто-выпуклой так:
То же самое, но для x2 вместо минуса ставь плюс. И для второго угла убери 180. Для двояковогнутой надо координаты центра сдвинуть: Width div 2 - r1 и Width div 2 + r2 (тогда обе дуги коснутся в центре, чтот не касались - ещё подвинь). -------------------- |
|
|
|
| мисс_граффити |
24.01.2011 9:14
Сообщение
#9
|
 просто человек Группа: Модераторы Сообщений: 3 641 Пол: Женский Реальное имя: Юлия Репутация: 55 |
ODVk, и зачем ты это сделал?
-------------------- Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения! |
|
|
|
| -TarasBer- |
24.01.2011 10:42
Сообщение
#10
|
|
Гость |
Опять небось боится, чтобы его училка запалила.
Пора сроки редактирования ужать. |
|
|
|
| volvo |
24.01.2011 11:25
Сообщение
#11
|
|
Гость |
Куда уж ужимать-то? Раньше было 43200 минут = 30 суток. Сейчас ужали до 5760 = 4 суток. Что, запрещать после пары-тройки часов?
|
|
|
|
| Lapp |
24.01.2011 21:23
Сообщение
#12
|
|
Уникум Группа: Модераторы Сообщений: 6 823 Пол: Мужской Реальное имя: Лопáрь (Андрей) Репутация: 159 |
Цитата(volvo @ 24.01.2011 11:25) Раньше было 43200 минут = 30 суток. Сейчас ужали до 5760 = 4 суток. Что, запрещать после пары-тройки часов? Думаю, что да. Фактически, достаточно и одного часа на исправление замеченных ошибок. Остальное пусть исправляют словами "там-то читать то-то". Пока предлагаю сжать до 30 часов И выпрашивать "ну исправь название!" ни к чему. Исправлять за них (если не лень) или удалять. Такое мое мнение. Добавлено через 2 мин. Кстати, именно поэтому я теперь чаще цитирую мессадж целиком. -------------------- я - ветер, я северный холодный ветер
я час расставанья, я год возвращенья домой |
|
|
|
|
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 15.01.2025 4:59 |