Меню Рубрики

Косинус в delphi как написать

Тригонометрические функции

Тригонометрические функции
при подсчете Cos(90*pi/180) программа считает значение( получается попадаем в область машинного.

тригонометрические функции
Помогите сделать калькулятор ,вычисляющий только тригонометрические функции

Калькулятор.Тригонометрические функции
Помогите реализовать в калькуляторе тригонометрические функции, что-то у меня не сходится. .

Тригонометрические функции
Подчеркивает tanh и sinh с ошибкой «IntelliSense: существует более одного экземпляра.

И правда, тогда Ваша формула верна, только что набрасал проект, и все верно работает!

Добавлено через 4 минуты
Вот кнопка по нажатию, все верно выводит sin(45)=0,71..

Да я понял, что -5.42101086242752E-20 это почти нуль, но ведь пользователю нужен 0, а не это чудовище. А как можно округлить такие малюсенькие значения?

S2dent, а у вас правда «0» написал или это вы для меня округлили?

в 13 строке у вас ошибка потому что значение X это адна переменная а вы к ней привязваете еще и 2 параметра напишите так:

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Тригонометрические функции
Всем привет. Я новичок в С++. Поставил себе задачу написать прогу построений и анализа гриафиков.

Тригонометрические функции
Всем здравствуйте! 🙂 Скажите,пожалуйста, почему матлаб неверно считает косинус 90 градусов.

Тригонометрические функции
У меня такой вопрос?Как нарисовать график функции синуса? И как подключить саму Библиотеку GRAPH .

тригонометрические функции
Создайте в Word программу для вычислений значений тригонометрических функций. Программа должна.

Источник статьи: http://www.cyberforum.ru/delphi-beginners/thread90664.html

Определить косинус угла ϕ

Вычислить косинус угла между векторами.
Написать программу для вычисления косинуса угла между векторами, заданными своими координатами.

Определить косинус угла между прямыми
Определить косинус угла между прямыми 10x-9y+4=0 и 3x+11y-9=0. Решаю по формуле, которая приведена.

Косинус угла между векторами
Доброго времени суток! Не могли бы подсказать в чем я делаю ошибку? Задание такое: Дано ā =.

Косинус угла между векторами
Косинус угла между векторами

суть в том что прошерстил интернет и толком не могу напиать программу

Добавлено через 1 минуту
не могу понять как в комбокс вбить строчки

Попробуйте начать написание проекта сами, а мы поможем если возникнут вопросы или ошибки.

Функции для вычислений:
Косинус — Cos(угол в радианах);
Тангенс — Tan(угол в радианах);

Как Вы будете задавать угол, и выводить результат решать вам (через диалоги или какой либо объект, например TEdit)

Для кнопки «определить» необходимо написать 2 условия:
1 условие если в ComboBox1 текст Cos, то рассчитать косинус
2 условие, если в ComboBox1 текст Tan, то рассчитать тангенс

Для кнопки «выход» реализовать выход из программы функцией — Exit

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Котангенс и косинус двойного угла
Дано: ctg\gamma =-\frac<4> <3>Найти: cos2\beta Решение: Из соотношений ctg\gamma.

как найти косинус угла
Как найти косинус если дан угол, а паскаль находит в радианах.

Косинус угла между векторами
Помогите! Есть метод класса Anqle //считает величину косинуса угла между векторами.

Найти косинус угла между плоскостями
Здраствуйте. Помогите решить задачку. Найти косинус угла между плоскостями: П1 проходит через.

Источник статьи: http://www.cyberforum.ru/delphi-beginners/thread2213728.html

Косинус в delphi как написать

Burka
Дата 27.4.2008, 04:05 (ссылка) | (нет голосов) Загрузка .

Опытный

Профиль
Группа: Участник
Сообщений: 429
Регистрация: 11.5.2007

Помогите разобратся, понять не могу что не так.

Код
procedure TForm1.Button3Click(Sender: TObject);
var alfa,alfa_radian,result:real
begin
alfa:=90;
alfa_radian:=alfa * pi / 180;
result := cos(alfa_radian); //6,12303176911189E-17, хотя должно быть равно 0
end;

Косинус не правильно считает, хотя вроде сделал все верно, перевел угол в радианы.
Че не так?

Это сообщение отредактировал(а) Burka — 27.4.2008, 04:05

volvo877
Дата 27.4.2008, 08:50 (ссылка) | (нет голосов) Загрузка .

Эксперт

Профиль
Группа: Комодератор
Сообщений: 2072
Регистрация: 15.11.2004

То есть, по-твоему, значащая цифра в 17-ом знаке после запятой — это не достаточная точность? Куда уж точнее?

Кстати, с какой точностью, ты думаешь, представляется Pi? Чтоб получить совершенно правильный результат, надо сначала получить совершенно правильное значение угла в радианах, правда? Извини, тогда твоя задача нерешаема, Pi не представляется абсолютно точно никакими способами.

Burka
Дата 27.4.2008, 10:00 (ссылка) | (нет голосов) Загрузка .

Опытный

Профиль
Группа: Участник
Сообщений: 429
Регистрация: 11.5.2007

volvo877, ты блин, очень внимательный. Косинус 90 градусов должно быть НОЛЬ, у меня не правильно считает. причем тут точность.

Это сообщение отредактировал(а) Burka — 27.4.2008, 10:02

volvo877
Дата 27.4.2008, 10:25 (ссылка) | (голосов:1) Загрузка .

Эксперт

Профиль
Группа: Комодератор
Сообщений: 2072
Регистрация: 15.11.2004

Burka, ты очень настойчивый, как я погляжу?

Да плевать компьютер хотел, чему равен косинус 90 градусов, ибо вычисляет он косинус 90*Пи/180 радиан. И погрешность вносится при переводе в радианы из-за не абсолютно точного значения Pi .

Код
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 знаками после запятой. Еще вопросы будут?

Это сообщение отредактировал(а) volvo877 — 27.4.2008, 10:30

Burka
Дата 27.4.2008, 11:22 (ссылка) | (нет голосов) Загрузка .

Опытный

Профиль
Группа: Участник
Сообщений: 429
Регистрация: 11.5.2007

ВНИМАНИЕ! Прежде чем создавать темы, или писать сообщения в данный раздел, ознакомьтесь, пожалуйста, с Правилами форума и конкретно этого раздела.
Несоблюдение правил может повлечь за собой самые строгие меры от закрытия/удаления темы до бана пользователя!

  • Название темы должно отражать её суть! (Не следует добавлять туда слова «помогите», «срочно» и т.п.)
  • При создании темы, первым делом в квадратных скобках укажите область, из которой исходит вопрос (язык, дисциплина, диплом). Пример: [C++].
  • В названии темы не нужно указывать происхождение задачи (например «школьная задача», «задача из учебника» и т.п.), не нужно указывать ее сложность («простая задача», «легкий вопрос» и т.п.). Все это можно писать в тексте самой задачи.
  • Если Вы ошиблись при вводе названия темы, отправьте письмо любому из модераторов раздела (через личные сообщения или report).
  • Для подсветки кода пользуйтесь тегами [code][/code] (выделяйте код и нажимаете на кнопку «Код»). Не забывайте выбирать при этом соответствующий язык.
  • Помните: один топик — один вопрос!
  • В данном разделе запрещено поднимать темы , т.е. при отсутствии ответов на Ваш вопрос добавлять новые ответы к теме, тем самым поднимая тему на верх списка.
  • Если вы хотите, чтобы вашу проблему решили при помощи определенного алгоритма, то не забудьте описать его!
  • Если вопрос решён, то воспользуйтесь ссылкой «Пометить как решённый», которая находится под кнопками создания темы или специальным флажком при ответе.

Более подробно с правилами данного раздела Вы можете ознакомится в этой теме.

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Poseidon, Rodman

Источник статьи: http://forum.vingrad.ru/topic-208492.html


0 0 голоса
Article Rating
Подписаться
Уведомить о
guest

0 Комментарий
Старые
Новые Популярные
Межтекстовые Отзывы
Посмотреть все комментарии