diff options
Diffstat (limited to '3845/CH20/EX20.10/Ex20_10.sce')
| -rw-r--r-- | 3845/CH20/EX20.10/Ex20_10.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/3845/CH20/EX20.10/Ex20_10.sce b/3845/CH20/EX20.10/Ex20_10.sce new file mode 100644 index 000000000..f3e62de5f --- /dev/null +++ b/3845/CH20/EX20.10/Ex20_10.sce @@ -0,0 +1,13 @@ +//Example 20.10
+P_ave=100*10^6;//Average power (W)
+V_rms=200*10^3;//Rms voltage (V)
+I_rms=P_ave/V_rms;//Rms current (A)
+printf('a.Current required = %0.1f A',I_rms)
+R=1;//Resistance (ohm)
+P_ave_b=I_rms^2*R;//Power dissipated (W)
+printf('\nb.Power dissipated by transmission lines = %0.1f kW',P_ave_b/1000)
+percent_loss=P_ave_b/P_ave*100;
+printf('\nc.Percentage of power lost = %0.3f%%',percent_loss)
+//Answer varies due to round off error
+//Openstax - College Physics
+//Download for free at http://cnx.org/content/col11406/latest
|