diff options
Diffstat (limited to '3369/CH12/EX12.4')
| -rwxr-xr-x | 3369/CH12/EX12.4/Ex12_4.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/3369/CH12/EX12.4/Ex12_4.sce b/3369/CH12/EX12.4/Ex12_4.sce new file mode 100755 index 000000000..22c60b7b0 --- /dev/null +++ b/3369/CH12/EX12.4/Ex12_4.sce @@ -0,0 +1,13 @@ +//Chapter 12, Exmaple 4, page 406 +//Calculate resistivity +clear +clc +// Baased on Equation 12.1*10**2 +c4 = 0.5*10**2/10 // micro F +Ic = 2*10**4*2*%pi*5*50*10**-6/sqrt(3) +C = (sqrt(3)*10000*Ic)*(10**-9*10**6) +printf("\n C4 = %f mircoF ",c4) +printf("\n Line charging current = %f A ",Ic) +printf("\n Charging = %f kVA ",C) + +// Answers may vary due to round off error |