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

проблемы с вычислением десятичного логарифма   Найти похожие ветки 

← →
pavel_guzhanov ©   (2006-01-16 10:38) [0]

подскажите пожалуйста, как вычислить десятичный логарифм. я делаю вот так:
var c,d:Double;
begin
..........
c:=100;
d:=Log10(c);
.................
в результате получаю, что d=0....
Подставляю вместо с число, т.е.
d:=Log10(100);
- тот же результат...
Что я делаю неверно?

---

← →
Плохиш ©   (2006-01-16 10:44) [1]

В приведённом коде ошибки нет, d = 2. Ошибка в 17й неприведённой здесь строке.

---

← →
pavel_guzhanov ©   (2006-01-16 10:50) [2]

к вычислению логарифма остальные строки отношения не имеют... в программе вычисление сложнее, но я пропустил всю сложность, и в программе сделал именно так, как в вопросе. Никакиз других строк, влияющих на значения с и d там нет. на следующей строке после вычисления логарифма я ставлю точку останова, и подношу курсор мыши к переменной d. Появляется подсказка "D=0"

---

← →
Плохиш ©   (2006-01-16 10:51) [3]

procedure TForm1.FormCreate(Sender: TObject);
var
   c, d: double;
begin
 c := 100;
 d := Log10(c);
 MessageDlg(FloatToStr(d), mtInformation, [mbOk], 0);
end;

Отгадай с трёх раз, что покажет MessageDlg?

---

← →
pavel_guzhanov ©   (2006-01-16 10:59) [4]

действительно, в MessageDialog выдается нормальное значение, а вот в отладчике,так как я сказал в [2] показывает 0, это меня и сбило с толку:-))
Спасибо за помощь

---

← →
Плохиш ©   (2006-01-16 11:04) [5]

> а вот в отладчике,так как я сказал в [2] показывает 0

<telepator on>
d в дальнейших вычислениях не используется, поэтому оптимизатор выкинул всю строку и показывается мусор.
</telepator off>

---

← →
pavel_guzhanov ©   (2006-01-16 11:11) [6]

спасибо

---

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

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



Память: 0.46 MB
Время: -0.961 c