From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 3169/CH6/EX6.10/Ex6_10.sce | 29 +++++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)
 create mode 100644 3169/CH6/EX6.10/Ex6_10.sce

(limited to '3169/CH6/EX6.10/Ex6_10.sce')

diff --git a/3169/CH6/EX6.10/Ex6_10.sce b/3169/CH6/EX6.10/Ex6_10.sce
new file mode 100644
index 000000000..b0e18423c
--- /dev/null
+++ b/3169/CH6/EX6.10/Ex6_10.sce
@@ -0,0 +1,29 @@
+//developed in windows XP operating system
+//platform Scilab 5.4.1
+clc;clear all;
+//example 6.10
+//calculation of resistance and inductance
+
+//given data
+CR=70.6//value from table
+LC=11.6//value from table
+C=1//capacitance(in microfarad)
+pern=98.8//percentage voltage efficiency
+V=10//rating(in kV)
+LC2=65//value from table
+alpha=0.0535//value from table
+
+//calculation
+R=CR/C
+L=LC/C
+Vo=pern*V/100
+L2=LC2/C
+R2=2*L2*alpha
+Ip=V*C/14
+
+printf('The value of resistance for 1/50 microsecond voltage is %3.1f ohm',R)
+printf('\nThe value of inductance for 1/50 microsecond voltage is %3.1f microhenry',L)
+printf('\nThe value of output voltage is %3.2f kV',Vo)
+printf('\nThe value of inductance for 8/20 microsecond voltage is %d microhenry',L2)
+printf('\nThe value of resistance for 8/20 microsecond voltage is %3.3f ohm',R2)
+printf('\nThe peak value of current is %d A',Ip*10^3)
-- 
cgit