VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日： 2006/07/28(Fri) 11:21
投稿者： 月子
Ｅメール：
ＵＲＬ：
タイトル： Re^4: 超越関数

ご回答ありがとう御座います。

もさんが記述してくれた内容をそのまま
x=○○　とXに代入して色々数値を変えて実行してみたのですが、
xをどんな値にしても返って来る数値は0.785398・・・・・となってしまいます。

Private Sub Form_Load()　を空白にしてただ単に
　
Arccos = Atn(-x / Sqr(-x * x + 1)) + 2 * Atn(1)　の関数を実行した場合も
全く同じ状態です。

私が根本的に理解していないのかもしれません＾＾；


私が作成したいプログラムは単純に三角形の辺や角度を計算するものなのですが、
現在角度を求める式で、このアークコサイン関数を使用したいのです。


例えば、三角比で　　底辺：高さ：斜辺　　1:1:√2  　（この場合内角の角度は90・45・45）
                    θ=rccos（底辺/斜辺）

上記を踏まえて、

x=1/Sqr(2)
Arccos = Atn(-x / Sqr(-x * x + 1)) + 2 * Atn(1)

返り値は　45 となると思っているのですが、この考え自体間違いなのでしょうか？

- 関連一覧ツリー （★ をクリックするとツリー全体を一括表示します）
- 返信フォーム （この記事に返信する場合は下記フォームから投稿して下さい）

- VBレスキュー(花ちゃん) - - Web Forum -