 Как заставить точку двигаться по кругу?, Вграфическом режиме нарисовать вращающийся радиус окружности |
Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
Правила раздела!
1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] ... [/code] или [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ" и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное - это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) - для этого есть отдельный раздел!
  |
| Gendalf |
Сообщение
#1
|
|
Новичок  Группа: Ожидающие Сообщений: 27 Пол: Мужской Реальное имя: Юрий Репутация:  0   |
Если вас не затруднит - ответьте! Как в графическом режиме нарисовать прямую, один конец которой лежит в центре окружности, а бругой - перемещается по её поверхности, через определённый промежуток времени. Но не точку на окружности мне нужно нарисовать. Её я нарисовал процедурой Arc с углом в один радиус.
|
   |
 
|
| APAL |
Сообщение
#2
|
 Смотрю... Группа: Пользователи Сообщений: 1 055 Пол: Мужской Реальное имя: Пшеничный Алексей Анатольевич Репутация: 6 |
Уравнение окружности: X^2+Y^2=R^2
-------------------- |
|
|
|
| Gendalf |
Сообщение
#3
|
|
Новичок Группа: Ожидающие Сообщений: 27 Пол: Мужской Реальное имя: Юрий Репутация: 0 |
Спасибо за помощь, APAL, но я уже так пробовал, он пишет переполнение стека. От этой ошибки я ни как не могу избавиться. Есть ли другой способ? Совсем забыл. Я пишу на Tp 7.0.
|
|
|
|
| APAL |
Сообщение
#4
|
|
Смотрю... Группа: Пользователи Сообщений: 1 055 Пол: Мужской Реальное имя: Пшеничный Алексей Анатольевич Репутация: 6 |
Цитата(Gendalf @ 10.03.2006 21:46)  Спасибо за помощь, APAL, но я уже так пробовал, он пишет переполнение стека. От этой ошибки я ни как не могу избавиться. Есть ли другой способ? Совсем забыл. Я пишу на Tp 7.0. С чего это вдруг переполнение стека??? Я думаю просто реализовано было все не очень правильно... -------------------- |
|
|
|
| volvo |
Сообщение
#5
|
|
Гость |
|
|
|
|
| LOSOS |
Сообщение
#6
|
 Новичок Группа: Пользователи Сообщений: 11 Пол: Мужской Реальное имя: Lamer Репутация: 0 |
Цитата(Gendalf @ 10.03.2006 21:38) Если вас не затруднит - ответьте! Как в графическом режиме нарисовать прямую, один конец которой лежит в центре окружности, а бругой - перемещается по её поверхности, через определённый промежуток времени. Но не точку на окружности мне нужно нарисовать. Её я нарисовал процедурой Arc с углом в один радиус. разбей окружность на четыре сектора и опиши случаи я так когдато делал |
|
|
|
| volvo |
Сообщение
#7
|
|
Гость |
LOSOS, во-первых, не надо советовать так делать! Ты хочешь, чтобы человек вместо одной написал 4 программы? Зачем? Только потому, что ты с этим мучался, теперь все остальные тоже должны через это пройти? Все прекрасно делается безо всяких разбиений на сектора...
А во-вторых, ты по ссылке ходил? |
|
|
|
| LOSOS |
Сообщение
#8
|
|
Новичок Группа: Пользователи Сообщений: 11 Пол: Мужской Реальное имя: Lamer Репутация: 0 |
Цитата(volvo @ 13.03.2006 10:13) LOSOS, во-первых, не надо советовать так делать! Ты хочешь, чтобы человек вместо одной написал 4 программы? Зачем? Только потому, что ты с этим мучался, теперь все остальные тоже должны через это пройти? Все прекрасно делается безо всяких разбиений на сектора... А во-вторых, ты по ссылке ходил? да посотрел но там тоже не коротко а на сектора когда разбиваешь просто тупо скопировал и слегка поменял |
|
|
|
| LOSOS |
Сообщение
#9
|
|
Новичок Группа: Пользователи Сообщений: 11 Пол: Мужской Реальное имя: Lamer Репутация: 0 |
Цитата(APAL @ 10.03.2006 21:40) Уравнение окружности: X^2+Y^2=R^2 УРАВНЕНИЕ ОКРУЖНОСТИ ВыГЛЯДИТ ТАК: (x-a)^2+(y-b)^2=R^2 где (a,b) координаты центра |
|
|
|
| volvo |
Сообщение
#10
|
|
Гость |
Цитата но там тоже не коротко А знаешь, почему? Потому, что та программа позволяет ОДНОВРЕМЕННО отрисовывать до 10 (а может и больше) таких вот крутящихся "радаров"... Если делать для одного, то решение займет 3 строки...Цитата а на сектора когда разбиваешь просто тупо скопировал и слегка поменял Вообще-то программировать с умом надо...  |
|
|
|
| han |
Сообщение
#11
|
 Группа: Пользователи Сообщений: 9 Пол: Мужской Реальное имя: Хан Башкирский Репутация: 0 |
а я использовал полярную систему координат...
---R=x*cos(a)+y*sin(a)--- честно говоря не помню точно, как это выглядело, но работало все прекрасно... здесь ведь надо указать "следующие" координаты точки и практически все... поправьте меня, если я не прав, но по моему так проще всего... Цитата(han @ 14.03.2006 11:08) ---R=x*cos(a)+y*sin(a)--- прошу прощения за ошибку: x=x0+r*cos(a) y=y0+r*sin(a) если интересно - вот примерно так(см файл) Сообщение отредактировано: han - Прикрепленные файлы 
point.pas ( 537 байт )
Кол-во скачиваний: 424-------------------- завтра будет.
лучше... |
|
|
|
| volvo |
Сообщение
#12
|
|
Гость |
han,
еще раз ссылку привести?  Неужели трудно кликнуть, посмотреть, как СОВЕТУЮТ делать, а потом комментировать? Или ты не заметил, что там именно полярная система и используется? |
|
|
|
| han |
Сообщение
#13
|
|
Группа: Пользователи Сообщений: 9 Пол: Мужской Реальное имя: Хан Башкирский Репутация: 0 |
все все
больше не буду -------------------- завтра будет.
лучше... |
|
|
|
| Gendalf |
Сообщение
#14
|
|
Новичок Группа: Ожидающие Сообщений: 27 Пол: Мужской Реальное имя: Юрий Репутация: 0 |
Извините, что долго не был на форуме, дела. Volvo за ссылку огромное спасибо, она мне очень помогла
|
|
|
|
| where can i buy plaquenil withou |
Сообщение
#15
|
|
Гость |
Amoxil For Ear Infections
|
|
|
|
| propecia online pharmacy new yor |
Сообщение
#16
|
|
Гость |
Non Prescription Viagra Reviews
|
|
|
|
| best place to buy furosemide onl |
Сообщение
#17
|
|
Гость |
Priligy Modo De Usar
|
|
|
|
| better business bureau online ph |
Сообщение
#18
|
|
Гость |
Cialis Medikament Bestellen
|
|
|
|
|
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 2.04.2025 18:31 |
Связь с администрацией: bu_gen в домене octagram.name