diff options
Diffstat (limited to '1802/CH7/EX7.6')
-rwxr-xr-x | 1802/CH7/EX7.6/Exa7_6.sce | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/1802/CH7/EX7.6/Exa7_6.sce b/1802/CH7/EX7.6/Exa7_6.sce new file mode 100755 index 000000000..03efc7722 --- /dev/null +++ b/1802/CH7/EX7.6/Exa7_6.sce @@ -0,0 +1,21 @@ +//Exa 7.6
+clc;
+clear;
+close;
+//Given data :
+format('v',5);
+VA=240;//in volt
+MAxVDrop=VA*5/100;//in volt
+rho=2.87*10^-6;//in ohm-cm
+//VAB+VBC+VCA=0;//in volt
+IA=(3200)/(26);//in Ampere
+IAB=IA;//in Ampere
+IBC=IA-100;//in Ampere
+//Allowed voltage drop: IAB*RAB+IBC*RBC=12
+R=12/(1015.26);//in ohm
+RAB=R*300*2/100;//in ohm
+RBC=R*600*2/100;//in ohm
+RCA=R*400*2/100;//in ohm
+//formula : R=rho*l/a
+a=rho*(100*100)/R;//in cm^2
+disp(a,"Cross section area(in cm^2) :");
\ No newline at end of file |