IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

 
 Ответить  Открыть новую тему 
> Как построить правильный многоугольник?
Крутой
сообщение 29.11.2003 19:31
Сообщение #1


Гость






:smile.gif
Ребята, как построить правильный многоугольник и заставить его вращаться вокруг заданной точки с постоянной скоростью?

Заранее спасибо !!!
 К началу страницы 
+ Ответить 
GLuk
сообщение 29.11.2003 20:45
Сообщение #2


Профи
****

Группа: Пользователи
Сообщений: 775
Пол: Мужской

Репутация: -  0  +


Юзая средства модуля GRAPH??
Во-всяком случае по формуле...
И ишшо - это какой-то конкретный многоугольник или все равно?
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Крутой
сообщение 30.11.2003 6:56
Сообщение #3


Гость






;D
Так это и дураку понятно, что используя Graph, вот только как ???? А сколько углов у правильного многоугольника - должен вводить пользователь !?? ???
 К началу страницы 
+ Ответить 
Simbar_
сообщение 30.11.2003 8:30
Сообщение #4


Гость






Все просто как грабли. Используем элементы тригонометрии и получаем 2 интересные формулы.
Код
for i:= 1 to n do
begin
x[i]:= Cx+Trunc(R*Sin(i*2*Pi/n));
y[i]:=Cy+Trunc(R*Cos(i*2*Pi/n));
end;

где Сх,Cy- координаты центра многоугольника, R- его радиус, n - колво сторон(углов)
Все теперь у тя есть массив с координатами точек. но мжно их и на прямую загонять
типа
Код
Moveto(C.x,C.y-R);
  for i:=1 to n do
    LineTo(C.x+Trunc(R*Sin(i*2*Pi/n)),C.y-Trunc(R*Cos(i*2*Pi/n)));

Не уверен что такая запись будет работать в Пасе так как писал на дельфи ;)

Сообщение отредактировано: volvo - 17.12.2004 16:29
 К началу страницы 
+ Ответить 
Крутой
сообщение 30.11.2003 10:05
Сообщение #5


Гость






;D Проканало !!!!!!!!!!! ;D
Действительно, как грабли !!!!!!!!!
Огромное спасибо !!!!!!!!!!!!!!!!!!!!
 К началу страницы 
+ Ответить 
GLuk
сообщение 30.11.2003 17:15
Сообщение #6


Профи
****

Группа: Пользователи
Сообщений: 775
Пол: Мужской

Репутация: -  0  +


2Simbar_: Энто если многоугольник выпуклый......... 8)
2Cool: Дураку все понятно... :D
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Крутой
сообщение 30.11.2003 18:13
Сообщение #7


Гость






Так ты понял ???
А какой еще многоугольник, если он правильный??? -- Естественно, выпуклый !!
 К началу страницы 
+ Ответить 
Крутой
сообщение 30.11.2003 18:14
Сообщение #8


Гость






Я же условие дал !!
 К началу страницы 
+ Ответить 
trminator
сообщение 30.11.2003 18:24
Сообщение #9


Четыре квадратика
****

Группа: Пользователи
Сообщений: 579
Пол: Мужской

Репутация: -  4  +


<offtopic>
Цитата
Так ты понял ???
А какой еще многоугольник, если он правильный??? -- Естественно, выпуклый !!

Звезду на советском флаге видел? Правильный многоугольник? А выпуклый?
Цитата
Так это и дураку понятно, что используя Graph

Да... а рисовать на Паскале можно только используя graph. Можешь у GLuk'a спросить, он тоже рисует только graph'ом. Или, может, все тут дураки? Гррр... >:(
</offtopic>


--------------------
Закон добровольного труда Зимерги:
Люди всегда согласны сделать работу, когда необходимость в этом уже отпала
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
GLuk
сообщение 30.11.2003 18:33
Сообщение #10


Профи
****

Группа: Пользователи
Сообщений: 775
Пол: Мужской

Репутация: -  0  +


Хватит "оффтопика". Если все поняли, тогда все хорошо...
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Крутой
сообщение 30.11.2003 19:43
Сообщение #11


Гость






trminator, ты видно математику в школе плоховато учил??
Правильный многоугольник -- всегда выпуклый !!!
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 18.07.2025 17:23
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"