summaryrefslogtreecommitdiff
path: root/3636/CH14/EX14.1/Ex14_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '3636/CH14/EX14.1/Ex14_1.sce')
-rw-r--r--3636/CH14/EX14.1/Ex14_1.sce16
1 files changed, 16 insertions, 0 deletions
diff --git a/3636/CH14/EX14.1/Ex14_1.sce b/3636/CH14/EX14.1/Ex14_1.sce
new file mode 100644
index 000000000..1455001b3
--- /dev/null
+++ b/3636/CH14/EX14.1/Ex14_1.sce
@@ -0,0 +1,16 @@
+clear;
+clc;
+Vm=100 //voltage in V
+Rf=1*10^3 //resistance in series in ohm
+Rl=4*10^3 //load resistance in ohm
+
+//Calculation
+Im=Vm/(Rf+Rl)
+Idc=Im/%pi
+Irms=Im/2
+
+format("e",8)
+disp(Im,"(a)Maximum current Im is (A)= ")
+format("e",9)
+disp(Idc,"(b)dc component of current Idc is (A)=")
+disp(Irms,"(c)rms value of current Irms (A)= ")