名前 題名 ▼ takiさん > 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 > > // 改めて確認すると > label5.Caption := floattostr(b.Real); // -0.601815.. > label6.Caption := floattostr(b.Imaginary); // 0.798635.. GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link