1 files changed, 19 insertions, 0 deletions
diff --git a/3871/CH5/EX5.22/Ex5_22.sce b/3871/CH5/EX5.22/Ex5_22.sce
new file mode 100644
index 000000000..8f2d0168d
--- /dev/null
+++ b/3871/CH5/EX5.22/Ex5_22.sce
@@ -0,0 +1,19 @@
+//===========================================================================
+//chapter 5 example 22
+
+clc;
+clear all;
+
+//variable declaration
+ Irms           = 32;		//measured reading reading in A
+ Ir         = 30;           //rectifier ammeter reading in A
+Ks          = 1.11;		//form factor for sinusoidal wave
+
+//calculations
+Iav     = Ir/(Ks);		//average value of current under measurement in A
+e          = ((Irms)/(Iav));		//percentage errror in %
+
+//result
+
+mprintf("form factor = %3.3f ",e);
+