程序为计算书 3-4 的过程程序可以解决开式单直网络和树状网络的计算。树状网络计算时要自己先设定好支路的起始节点和终止节点标号以及计算顺序源代码：#include#include#include#includeusingnamespacestd;structnode{〃节点类inti;〃节点编号doubleU,P,Q,delta;〃额定电压计算负荷电压相角};structline{〃线路类连接父节点子节点nodef_node,s_node;〃父节点子节点doubleR,X,B;〃线路参数 RXB/2doubleP_in,Q_in,P_out,Q_out,d_P,d_Q,D_U,d_U;〃线路输入输出功率以及线路消耗功率voidSet_node(nodenod1,nodenod2){f_node=nod1;s_node=nod2;}};voidfun1(line&lin){〃由后往前递推功率doublep=lin.P_out;doubleq=lin.Q_out;doubleu=lin.s_node.U;lin.d_P=(p*p+q*q)/u/u*lin.R;lin.d_Q=(p*p+q*q)/u/u*lin.X;lin.P_in=lin.d_P+lin.P_out;lin.Q_in=lin.d_Q+lin.Q_out;};voidfun2(line&lin){//由前往后推电压doublep=lin.P_in;doubleq=lin.Q_in;doubleu=lin.f_node.U;lin.D_U=(p*lin.R+q*lin.X)/u;lin.d_U=(p*lin.X-q*lin.R)/u;lin.s_node.U=sqrt(pow(lin.f_node.U-lin.D_U,2)+pow(lin.d_U,2));〃子节点电压lin.s_node.delta=lin.f_node.delta-atan(lin.d_U/(lin.f_node.U-lin.D_U));};voidfun3(line&lin){〃由前往后推电压不计横向分量doublep=lin.P_in;doubleq=lin.Q_in;doubleu=lin.f_node.U;lin.D_U=(p*lin.R+q*lin.X)/u;lin.d_U=(p*lin.X-q*lin.R)/u;lin.s_node.U=lin.f_node.U-lin.D_U,2;〃子节点电压lin.s_node.delta=lin.f_node.delta-atan(lin.d_U/(lin.f_node.U-lin.D_U));};voidmain(){intnum_l;intnum_n;〃支路数节点数ifstreamfin;fin.open("E:\\data.txt");fin»num_n»num」;//输入节点数支路数ofstreamfout;fout.open("E:\\databak.txt");node*nod;nod=newnode[num_n];//节点数目line*lin;lin=newline[num_l];〃线路数目nod[0].delta=0;double*u;//节点额定电压u=newdouble[num_n];for(inti=0;i>u[i];};double*p;〃节点有功功率p=newdouble[num_n];for(inti=0;i>p[i];};double*q;〃节点无功功率q=newdouble[num_n];for(inti=0;i>q[i];};for(inti=0;i>r[i];};double*x;〃线路电抗x=ne...
