Скачать: CL | DM;

Может быть есть аналог mod для Extended?   Найти похожие ветки 

← →
Пгуые   (2006-09-21 17:27) [0]

Может быть есть аналог 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?

---

← →
palva ©   (2006-09-21 17:51) [1]

Разделить взять Frac и снова умножить.

---

← →
Наиль ©   (2006-09-21 18:05) [2]

> Sin((2*Pi)/Period[a]*(Days mod Period[a]))

т.к. синус периодичный, то достаточно Sin(2*P*Days/Period[a])

---

← →
Пгуые   (2006-09-21 20:58) [3]

Спасибо за ответы. Ваш метод, Наиль, подошел ) благодарю

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: -0.958 c