summaryrefslogtreecommitdiff
path: root/3769/CH13/EX13.38/Ex13_38.sce
diff options
context:
space:
mode:
Diffstat (limited to '3769/CH13/EX13.38/Ex13_38.sce')
-rw-r--r--3769/CH13/EX13.38/Ex13_38.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/3769/CH13/EX13.38/Ex13_38.sce b/3769/CH13/EX13.38/Ex13_38.sce
new file mode 100644
index 000000000..83675d2b2
--- /dev/null
+++ b/3769/CH13/EX13.38/Ex13_38.sce
@@ -0,0 +1,18 @@
+clear
+//Given
+L=25.48*10**-3 //H
+C=796*10**-6
+R=3.0 //ohm
+E0=283
+
+//Calculation
+//
+fr=1/(2.0*%pi*sqrt(L*C))
+Iv=(E0/sqrt(2))/R
+P=Iv**2*R
+
+//Result
+printf("\n (a) Frequency of the source is %0.1f Hz",fr)
+printf("\n (b) The value of impedence is %0.3f ohm",R)
+printf("\n The value of current is %0.1f A",Iv)
+printf("\n The power dissipated is %0.0f W",P)