summaryrefslogtreecommitdiff
path: root/1802/CH7/EX7.7/Exa7_7.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1802/CH7/EX7.7/Exa7_7.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1802/CH7/EX7.7/Exa7_7.sce')
-rwxr-xr-x1802/CH7/EX7.7/Exa7_7.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/1802/CH7/EX7.7/Exa7_7.sce b/1802/CH7/EX7.7/Exa7_7.sce
new file mode 100755
index 000000000..d1d9f3b38
--- /dev/null
+++ b/1802/CH7/EX7.7/Exa7_7.sce
@@ -0,0 +1,18 @@
+//Exa 7.7
+clc;
+clear;
+close;
+//Given data :
+format('v',6);
+R=0.2;//in ohm/km
+X=0.1;//in ohm/km
+ZAM=((R+%i*X)/1000)*200;//in ohm
+ZMB=((R+%i*X)/1000)*100;//in ohm
+I1=100*(0.707-0.707*%i);//in A
+I2=200*(0.8-0.6*%i);//in A
+IAM=I1+I2;//in Ampere
+VAM=ZAM*IAM;//in volts
+VMB=ZMB*I2;//in volts
+VAB=VAM+VMB;//in volts
+magVAB=sqrt(real(VAB)^2+imag(VAB)^2);
+disp(magVAB,"Total voltage drop(in volts) :"); \ No newline at end of file