1 files changed, 19 insertions, 0 deletions
diff --git a/3871/CH5/EX5.23/Ex5_23.sce b/3871/CH5/EX5.23/Ex5_23.sce
new file mode 100644
index 000000000..b9231163c
--- /dev/null
+++ b/3871/CH5/EX5.23/Ex5_23.sce
@@ -0,0 +1,19 @@
+//===========================================================================
+//chapter 5 example 23
+clc;
+clear all;
+
+//variable declaration
+ Ir           = 2.22;		//measured reading reading in A
+Ks          = 1.11;		//form factor for sinusoidal wave
+
+//calculations
+Iav     = Ir/(Ks);		//average value of current under measurement in A
+Imax    = 2*Iav;		//peak value of current in A
+Irms    = Imax/(sqrt(3));		//RMS value of current in 
+e          = ((Ir-Irms)/(Irms))*100;		//percentage errror in %
+
+//result
+mprintf("peak value of current = %3.2f A",Imax);
+mprintf("\nRMS value of current = %3.3f A",Irms);
+mprintf("\npercentage error = %3.2f percentage(low)",e);