|
// ------------------------------------
rad := (127 / 180) * pi;
a.Real := 0.0; // 0.0
a.Imaginary := rad; // 127
b := VarComplexExp(a); // b = e^a
kaku := VarComplexAngle(b); // 偏角は?
kaku := kaku / pi * 180;
label3.Caption := floattostr(kaku); // 127度
label4.Caption := floattostr(VarComplexAbs(b)); // 1.0
// ------------------------------------
rad := (127 / 180) * pi; // 2.21656...
a.Real := 0.0; // 0.0
a.Imaginary := -rad; // -127
b := VarComplexExp(a); // b = e^a
kaku := VarComplexAngle(b); // 偏角は?
kaku := kaku / pi * 180;
label5.Caption := floattostr(kaku); // -127度
label6.Caption := floattostr(VarComplexAbs(b)); // 1.0
// ------------------------------------
> Realが0なら、Imaginaryがどんな値をとっても・・・ですよね。
すみません。Realが0でも意味がありました。
しかも、長さは1.0になりました。
|