| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Может быть есть аналог mod для Extended? [D7]
Пгуые © (2006-09-21 17:27:00)Может быть есть аналог mod для Extended?
Реализую вывод графиков биоритмов. Через TChart. Что обьявлено:
const
Period: array [0..2] of Extended = (23.6884, 28.4261, 33.1638);
Вот кусок кода, отвечающий за добавление новых точек на графике:
for a:=0 to 2 do
BiorithmChart.Series[a].AddXY(i,Sin((2*Pi)/Period[a]*(Days mod Period[a])),IntToStr(DayOf(D))+#13+IntToStr(MonthOf(D)));
Естественно, ошибка на (Days mod Period[a]), т.к mod только для integer. Использование integer (т.е будут 23,28,33 в константах) не допускается, т.к результаты буду совсем левыми. Может кто знает, как подружить mod и extended?
Пгуые (2006-09-21 20:58:00) [1]Спасибо за ответы. Ваш метод, Наиль, подошел ) благодарю
Наиль (2006-09-21 18:05:00) [2]
> Sin((2*Pi)/Period[a]*(Days mod Period[a]))
т.к. синус периодичный, то достаточно Sin(2*P*Days/Period[a])
palva (2006-09-21 17:51:00) [3]Разделить взять Frac и снова умножить.
| |
