1 files changed, 15 insertions, 0 deletions
diff --git a/1958/CH13/EX13.4/Chapter13_example4.sce b/1958/CH13/EX13.4/Chapter13_example4.sce
new file mode 100755
index 000000000..7ddbf515e
--- /dev/null
+++ b/1958/CH13/EX13.4/Chapter13_example4.sce
@@ -0,0 +1,15 @@
+clc
+clear
+//Input data
+Vm=220//Maximum voltage in V
+f=50//frequency in Hz
+R=2000//Resistance in ohms
+C=5*10^-6//Capacitor in F
+
+//Calculations
+Xc=(1/(2*3.14*f*C))//Reactance in ohms
+Z=sqrt(R^2+Xc^2)//Impedence in ohm
+Vc=(Vm*Xc)/Z//Maximum potential difference across the capacitor in V
+
+//Output
+printf('Maximum potential difference across the capacitor is %3.2f V',Vc)