summaryrefslogtreecommitdiff
path: root/1994/CH7/EX7.15/Example7_15.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1994/CH7/EX7.15/Example7_15.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 '1994/CH7/EX7.15/Example7_15.sce')
-rwxr-xr-x1994/CH7/EX7.15/Example7_15.sce19
1 files changed, 19 insertions, 0 deletions
diff --git a/1994/CH7/EX7.15/Example7_15.sce b/1994/CH7/EX7.15/Example7_15.sce
new file mode 100755
index 000000000..06d415138
--- /dev/null
+++ b/1994/CH7/EX7.15/Example7_15.sce
@@ -0,0 +1,19 @@
+//Chapter-7,Example7_15,pg 7-41
+Rm=50
+Im=20*10^-3
+I=10
+Rsh=(Im*Rm)/(I-Im)
+printf("shunt resistance for I=10A\n")
+printf("Rsh=%.2f ohm\n",Rsh)
+I=20
+Rsh=(Im*Rm)/(I-Im)
+printf("shunt resistance for I=20A\n")
+printf("Rsh=%.2f ohm\n",Rsh)
+V=150
+Rs=(V/Im)-Rm
+printf("series resistance for V=150V\n")
+printf("Rs=%.2f ohm\n",Rs)
+V=300
+Rs=(V/Im)-Rm
+printf("series resistance for V=300V\n")
+printf("Rs=%.2f ohm",Rs)