不好意思，小弟又來打擾了！    今天想請教個問題就是有關sin函數的問題， 小弟如今寫一個函式 想要輸入一個數值 然後套入這個函式裡面讓她去產生一個數值出來並秀出    但是現在有個問題是 ： 當我的寫法 c:=sin(b); 而 b 等於30 時 他所出現的數值型態是 Radians 會出現  -0.98803162.....   而不會是小弟想要的原本型態 Degrees 照理說 Deg的數值會是 0.5                      也就是Sin30 度.. 以小弟的書本上的說明是寫說： Sin 傳回徑度量( Radians) x 的Sin函數值。 小弟該如何寫 才能讓它出現的數值是0.5而不是-0.98803162....呢？ 在此先感謝各位大大們的指導！！ 以下是小弟的原始碼 PS: 小弟分散開來寫並未寫成函式 是為了測試 sin的數值用^^

procedure TForm1.Button1Click(Sender: TObject);
begin    y:=strtoint(edit1.Text);    a:=5 * y * y;
b:=3 * y;
c:=sin(b);
d:=b * c;
e:=4 * y;
f:= a - d   e;    label1.Caption:=floattostr(c);    end;

發表人 - nomaid 於 2005/03/08 01:51:59

uses   system;      ......   c := Sin(b/180*PI);   ......     _________________________