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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 05.03.2008, 16:21   #11
KnDmPetr
Пользователь
 
Регистрация: 02.03.2008
Сообщений: 20
По умолчанию

Уважаемый puporev если можно то давайте пообщаемся в аське, а то скорость обмена информацией через форум низкая. Пожалуйста стучите 374_106_208
KnDmPetr вне форума Ответить с цитированием
Старый 05.03.2008, 18:43   #12
B_N
Новичок
Джуниор
 
Регистрация: 18.01.2008
Сообщений: 1,720
По умолчанию

Цитата:
Сообщение от KnDmPetr Посмотреть сообщение
......мне нужно чтобы ориентация многоугольника относительно своей оси (центра многоугольника) была задана случайным образом.
А в чём проблема?
Возьмите до цикла случайный угол
Код:
randomize;
a1 := (pi/180) * random(90);
и замените
Код:
a:=i*2*pi/n;   //вершины многоугольника
на
Код:
a:= a1 + i*2*pi/n;   //вершины многоугольника
B_N вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Интересная задача Ser Паскаль, Turbo Pascal, PascalABC.NET 3 27.02.2008 00:19
Поиск решения.(Задача) Lamborghini Microsoft Office Excel 1 19.02.2008 11:58
Интересная задача(MediaPlayer) PilGrim Компоненты Delphi 3 03.12.2007 08:46
интересная задача про DataTimePicker ГОСЕАН БД в Delphi 8 15.07.2007 16:37