summaryrefslogtreecommitdiff
path: root/1802/CH7/EX7.12/Exa7_12.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.12/Exa7_12.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.12/Exa7_12.sce')
-rwxr-xr-x1802/CH7/EX7.12/Exa7_12.sce19
1 files changed, 19 insertions, 0 deletions
diff --git a/1802/CH7/EX7.12/Exa7_12.sce b/1802/CH7/EX7.12/Exa7_12.sce
new file mode 100755
index 000000000..7ac103441
--- /dev/null
+++ b/1802/CH7/EX7.12/Exa7_12.sce
@@ -0,0 +1,19 @@
+//Exa 7.12
+clc;
+clear;
+close;
+//Given data :
+format('v',7);
+VA=220;//in volt
+VB=200;//in volt
+R=0.1;//in ohm/km
+I=1;//in A/m
+l=500;//in meter
+R=2*R/1000;//in ohm/m
+x=(VA-VB)/(I*R*l)+l/2;//in meter
+Vmin=VA-I*R*x^2/2;//in volts
+disp(Vmin,"Value of minimum potential(in V) :");
+IA=I*x;//in A
+disp(IA,"Current supplied from end A(in A) :");
+IB=I*(l-x);//in A
+disp(IB,"Current supplied from end B(in A) :"); \ No newline at end of file