1 files changed, 19 insertions, 0 deletions
diff --git a/147/CH18/EX18.5/Example18_5.sce b/147/CH18/EX18.5/Example18_5.sce
new file mode 100644
index 000000000..76b3a7122
--- /dev/null
+++ b/147/CH18/EX18.5/Example18_5.sce
@@ -0,0 +1,19 @@
+close();
+clear;
+clc;
+//time taken 't' for 'rev' revolutions, non-inductive load 'I', voltage 'V' and frequency 'f' of single phase energy meter with constant 'k'
+k = 200; //rev/kWh
+t = 180; //seconds
+rev = 10; 
+I = 4.4; //A
+V = 230; //V
+f = 50; //Hz
+//pf = cos(phi)
+pf = 1; //for non-inductive load
+//Energy consumed 'E'
+E = V*I*t*pf/(1000*3600); //kWh
+//Energy registered by meter 'Eg'
+Eg = rev/k; //kWh
+//percentage error 'per_error'
+per_error = (Eg-E)*100/E;
+mprintf("Percentage error of the instrument = %0.3f %%",per_error);
+\ No newline at end of file