Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 02.08.2013, 07:02   #1
Kpa6
 
Регистрация: 02.08.2013
Сообщений: 3
Восклицание Не имею опыта работы с паскалем,не могли бы подкинуть программу для данного задания?





Если не сложно,объясните принцип построения движущейся по окружности точки.Спасибо.
Kpa6 вне форума Ответить с цитированием
Старый 02.08.2013, 09:49   #2
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

примерно так:
Код:
задать координаты 1-кружка
задать координаты 2-кружка
задать приращение угла 1-го кружка
задать приращение угла 2-го кружка
задать центр вращения
цикл
  вывести кружочек1 по его координатам
  вывести кружочек2 по его координатам
  задержка на xx миллисекунд
  стереть кружочек1 (например, нарисовать его цветом фона)
  стереть кружочек2 (например, нарисовать его цветом фона)
  увеличить угол1 на приращение угла 1-го кружка
  пересчитать координаты 1-го кружочка, 
      умножив расстояние от центра этого кружка до центра вращения на sin(угла1) и cos(угла1)
   увеличить угол2 на приращение угла 1-го кружка
   пересчитать координаты 2-го кружочка, 
      умножив расстояние от центра этого кружка до центра вращения на sin(угла2) и cos(угла2)
конец цикла;
Serge_Bliznykov вне форума Ответить с цитированием
Старый 03.08.2013, 03:30   #3
Kpa6
 
Регистрация: 02.08.2013
Сообщений: 3
По умолчанию

То есть за точку можно принят круг радиуса Х,и просто постепенно его поворачивать относительно центра окружности с помощью цикла расчета угла поворота?
Kpa6 вне форума Ответить с цитированием
Старый 03.08.2013, 09:15   #4
puporev
Старожил
 
Регистрация: 13.10.2007
Сообщений: 2,740
По умолчанию

Для написания программы также важно в каком Паскале это делается.
puporev вне форума Ответить с цитированием
Старый 20.09.2013, 09:58   #5
stirenko
Новичок
Джуниор
 
Аватар для stirenko
 
Регистрация: 20.09.2013
Сообщений: 2
По умолчанию

Цитата:
Сообщение от Kpa6 Посмотреть сообщение
То есть за точку можно принят круг радиуса Х,и просто постепенно его поворачивать относительно центра окружности с помощью цикла расчета угла поворота?
А в каком паскале вы пишете программу?
stirenko вне форума Ответить с цитированием
Старый 20.09.2013, 10:47   #6
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

Цитата:
Сообщение от stirenko Посмотреть сообщение
А в каком паскале вы пишете программу?
не смущает, что это обсуждение было полтора месяца назад?!
Serge_Bliznykov вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Мне чисто для озакомления и прибавления опыта не могли вы бы скинуть ссылку на маааленкий троянчик или сами напишите мало же. Artem_host Общие вопросы Delphi 6 31.01.2012 22:08
Написать программу на HTML и JavaScript для следующего задания: Найти максимальную цифру в записи данного трехзначного ч Marika lady Помощь студентам 1 29.09.2011 06:48
не могли бы вы мне подкинуть програмку для создания игр a459565 Gamedev - cоздание игр: Unity, OpenGL, DirectX 11 30.06.2010 06:09