|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
05.12.2016, 02:59 | #1 |
Новичок
Джуниор
Регистрация: 05.12.2016
Сообщений: 3
|
Lazarus(Graph) смоделировать полёт стрелы до мишени. Люди добрые, помогите пожалуйста!
С помощью модулей Graph и Crt в среде Lazarus, ну на паскале кароче,
необходимо сделать следующее... В левом нижнем углу нарисовать стрелу, в правой стороне экрана - мишень. Смоделировать полет стрелы и попадание в мишень, угол наклона стрелы регулируется стрелочками на клаве... Подскажите, как смоделировать полет стрелы( как в жизни), а точнее- подскажите уравнения, по которым должна лететь стрела. Проблемы именно здесь, стрела летит либо боком, либо не по правильной траектории. Стрелу изначально рисовал как отрезок, и изменял с помощью уравнений координаты начала и конца стрелы. ПРОШУ, ПОМОГИТЕ! |
05.12.2016, 03:12 | #2 |
Старожил
Регистрация: 02.03.2008
Сообщений: 2,499
|
|
05.12.2016, 03:35 | #3 |
Новичок
Джуниор
Регистрация: 05.12.2016
Сообщений: 3
|
В задании нет уточнений, считаю, что достаточно сделать и без учёта силы тяжести, так, чтобы это выглядело более реально(жизненно), без каких-либо усложнений...
|
05.12.2016, 04:06 | #4 |
Старожил
Регистрация: 02.03.2008
Сообщений: 2,499
|
Тогда просто.
Дано: V - скорость стрелы, пиксел/сек, fi - угол к горизонту, радианы ( надо вычислить, если вектор скорости задается стрелками на клаве). t - время, сек LS - длина стрелы, пиксел X0,Y0 - начальные координаты острия стрелы на Canvas Вычисляются координаты острия стрелы на Canvas: Код:
Код:
|
05.12.2016, 04:34 | #5 |
Новичок
Джуниор
Регистрация: 05.12.2016
Сообщений: 3
|
Использовал ваши уравнения, не выходит, проблемы с циклом, не знаю как лучше задать... Получается, что необходимо использовать рекурсию!?
Помогите с кодом цикла, пожалуйста! |
05.12.2016, 05:24 | #6 |
Старожил
Регистрация: 02.03.2008
Сообщений: 2,499
|
Какая еще рекурсия ?
Вот вам заготовка на Лазарусе. Дорабатывайте . Код:
Последний раз редактировалось type_Oleg; 05.12.2016 в 05:26. |
05.12.2016, 15:22 | #7 |
Заблокирован
Регистрация: 05.12.2016
Сообщений: 1
|
Олег, у меня аналогичная задача, напишите пожалуйста данный участок кода, в консольном приложении Лазарус (а не в Формах), спасибо!
Используя только Graph и Crt... Последний раз редактировалось Алексей1234567; 05.12.2016 в 15:29. |
05.12.2016, 17:29 | #8 |
Старожил
Регистрация: 02.03.2008
Сообщений: 2,499
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Пожалуйста люди добрые помогите | Ольга ))))) | Общие вопросы Delphi | 0 | 16.05.2016 13:31 |
Люди добрые,помогите пожалуйста!!! | Иллоночка | Помощь студентам | 2 | 24.12.2009 15:03 |
Люди добрые,помогите пожалуйста решить задачки!!! | Мартышонок | Паскаль, Turbo Pascal, PascalABC.NET | 4 | 22.05.2008 08:00 |