|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
19.05.2010, 21:44 | #1 |
Пользователь
Регистрация: 14.03.2010
Сообщений: 18
|
Нарисовать спутники возле планет
Тут вопрос возник. Нужно математически просчитать ,а у меня голова не варит, да и бегаю сдаю другие предметы. Посмотрите исходник, кому не лень, может что-то сообразите.)
http://www.fayloobmennik.net/31590 само задание: Имеется центральная планета П с рядом спутников, у каждого из которых свои спутники, у тех - свои и т.д. Очевидно, что каждый спутник может рассматриваться как планета с соответствующими спутниками. Изобразить на экране модель планетарной системы, подчиняющейся данному алгоритму, если уровней вложенности N, а соответствующий алгоритм изображения имеет вид: алг Планета (арг цел x, y, рад, н, нсп, вещ к_орб, к_спут) // х, у - координаты планеты; рад - ее радиус // нсп - число спутников у каждой планеты // к_спут - отношение радиуса спутника к радиусу “своей” планеты // к_орб - то же для радиуса орбиты спутников. нач цел i, x1, e1, вещ угол, рад_орб если н>0 то поз (х,у) // центр планеты окружность (рад) // планета рад_орб := рад*к_орб //радиус орбиты спутников угол := 6.28 / нсп //угол между спутниками нц для i от 1 до нсп //для каждого спутника x1 := x + рад_орб*cos (угол*i) // координаты центра i-го спутника у1 := y + рад_орб*sin (угол*i) // вызываем алгоритм Планета с новыми аргументами Планета (x1, y1, int(рад*к_спут), н-1 нсп, к_орб, к_спут) кц все кон |
19.05.2010, 21:59 | #2 |
Форумчанин
Регистрация: 28.03.2008
Сообщений: 940
|
1. Тут вам не кто не будет писать программу!!!
2. Создайте тему в ветке "Помощь студентам" и задайте вопрос который вас интересует и возможно вам помогут. 3. Не хотите заморачиваться - идите к фрилансерам, за плату они вам напишут, возможно... |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
С. Нарисовать Ромб | Николай Денисюк | Помощь студентам | 4 | 13.11.2015 17:55 |
нарисовать | guverr | Общие вопросы Delphi | 1 | 29.04.2010 10:23 |
Нарисовать треуголник в си | Гамбит | Помощь студентам | 2 | 05.03.2010 22:33 |
Нарисовать карандаш | Настенька..Блонди | Общие вопросы Delphi | 6 | 21.05.2009 11:28 |