Как построить правильный многоугольник? Опции

[Крутой]

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

Заранее спасибо !!!

[GLuk]

Юзая средства модуля GRAPH??
Во-всяком случае по формуле...
И ишшо - это какой-то конкретный многоугольник или все равно?

[Крутой]

;D
Так это и дураку понятно, что используя Graph, вот только как ???? А сколько углов у правильного многоугольника - должен вводить пользователь !?? ???

[Simbar_]

Все просто как грабли. Используем элементы тригонометрии и получаем 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 20:29

[Крутой]

;D Проканало !!!!!!!!!!! ;D
Действительно, как грабли !!!!!!!!!
Огромное спасибо !!!!!!!!!!!!!!!!!!!!

[GLuk]

2Simbar_: Энто если многоугольник выпуклый......... 8)
2Cool: Дураку все понятно... :D

[Крутой]

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

[Крутой]

Я же условие дал !!

[trminator]

<offtopic>

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

Звезду на советском флаге видел? Правильный многоугольник? А выпуклый?

Так это и дураку понятно, что используя Graph

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

[GLuk]

Хватит "оффтопика". Если все поняли, тогда все хорошо...

[Крутой]

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