ラジアンから度数表示へ

解決

円 2003-12-24 07:20:04 No: 6367

初歩的なことと思うのですが，

ラジアンを度数に変更するため，
be1:=radtodeg(be1);
と入力すると
[エラー] Unit1.pas(152): 未定義の識別子 : 'radtodeg'
となります。

なぜかわかりません。

Halbow 2003-12-24 07:23:25 No: 6368

Halbow です。

> [エラー] Unit1.pas(152): 未定義の識別子 : 'radtodeg'

わたしの Delphi5 のヘルプによれば

RadToDeg はラジアンを度に変換します。

ユニット

Math

となっています。

uses 節に Math が入っていますか？なければ追加してください。

円 2003-12-24 08:36:53 No: 6369

ありがとうございます。

ヘルプは見ていたのですが，unitの部分が気づきませんでした。

で，あともうひとつなのですが，

a:=radtodeg(cos(5));
label1.caption:=floattostr(a);

としてもラジアンから度数に変換することができません。

したいのは，cos5°なら計算結果を0.996194698としたいです。

ちなみに，delphi6 personalです。

Halbow 2003-12-24 08:54:46 No: 6370

Halbow です。

cos() の戻り値は角度（ラジアン）ではありませんよー。
ー１から１の間の数値です。cos() のパラメータがラジアンの角度です。

> したいのは，cos5°なら計算結果を0.996194698としたいです。

uses
Math;

procedure TForm1.Button1Click(Sender: TObject);
var
  Ret:Extended;
begin
  Ret := Cos(DegToRad(5.0));
  Label1.Caption := FloatToStr(Ret);
end;

円 2003-12-24 09:00:02 No: 6371

ありがとうございました。
問題解決です。

数学の初歩的なことまで，
どうもすみませんでした。