もくじ
例題4-1
4[Ω]の抵抗と3[Ω]の誘導性リアクタンスが直列に接続されているインピーダンスZ[Ω]を求めるプログラム例を示します。

　　　　main ( )
　　　　{
　　　　　　　double x,y,z;
　　　　　　　x=4,y=3;
　　　　　　　z=sqrt(x*x+y*y);
　　　　　　　　printf ("z=%f[Ω]\n",z);
　　　　}
結果は、z=5[Ω]
と表示されます。

例題4-2
4[Ω]の抵抗と3[Ω]の誘導性リアクタンスが直列に接続されているインピーダンスZ[Ω]のcosΘ(力率)を求めるプログラム例を示します。

　　　　main ( )
　　　　{
　　　　　　　double x,y,z;
　　　　　　　x=4,y=3;
　　　　　　　z=sqrt(x*x+y*y);
　　　　　　　　printf ("cosΘ=%3.2g\n",x/z);
　　　　}

結果は、cosΘ=0.8
と表示されます。

例題4-3
電源に対して4[Ω]の抵抗と3[Ω]の誘導性リアクタンスが並列に接続されているインピーダンスZ[Ω]に12[V]の電圧を加えたときの皮相電力、有効電力、無効電力を求めるプログラム例を示します。

　　　　main ( )
　　　　{
　　　　　　　double i,iq,ir,s,p,q,v,x,y,z;
　　　　　　　v=12,x=4,y=3;
　　　　　　　z=sqrt(x*x+y*y);
　　　　　　　ir=v/x;iq=v/y; i=sqrt(ir*ir+iq*iq);
　　　　　　　　printf ("s=%f[VA]\n p=%f[W]\n q=%f[Var]\n"v*i,v*ir,v*iq);
　　　　}

結果は、s=60.000000[VA] p=36.000000[W] q=48.000000[Var]
と表示されます。