Burka, ты очень настойчивый, как я погляжу?
Цитата(Burka @ 27.4.2008, 09:00 ) | | Косинус 90 градусов должно быть НОЛЬ |
Да плевать компьютер хотел, чему равен косинус 90 градусов, ибо вычисляет он косинус 90*Пи/180 радиан. И погрешность вносится при переводе в радианы из-за не абсолютно точного значения Pi !!!
Цитата(Burka @ 27.4.2008, 09:00 ) | | причем тут точность. |
При том, что:
| Код | procedure TForm1.Button3Click(Sender: TObject); var my_pi, alfa, alfa_radian, result: extended; begin my_pi := 3.14; alfa:=90; alfa_radian:=alfa * my_pi / 180; result := cos(alfa_radian); end; |
ты получаешь 0.000796326710733263, если задашь my_pi = 3.14159, то получишь уже 1.32679489667753E-6, то есть 0.000000132679489667753... Чем ближе ты к правильному значению Пи, тем точнее ответ... У тебя сейчас получилось 6,12303176911189E-17, то есть, 0.00000000000000000612303176911189... Ближе к Pi ты не подберешься, ибо точность представления вещественного числа ограничена 15-16 знаками после запятой... Еще вопросы будут? |