1 files changed, 16 insertions, 0 deletions
diff --git a/1172/CH1/EX1.19/Example1_19.sce b/1172/CH1/EX1.19/Example1_19.sce
new file mode 100755
index 000000000..b5a087c54
--- /dev/null
+++ b/1172/CH1/EX1.19/Example1_19.sce
@@ -0,0 +1,16 @@
+clc
+//Given
+mu=4/3
+D_10=0.6// diameter of tenth ring in cm
+lambda=6.0e-5// wavelength of incident light in cm 
+n=10// order of ring 
+
+//Sample Problem 19 Page No. 54
+printf("\n # Problem 19 # \n")
+printf(" \n Standard formula used \n   D_n^2 = 4*n*lambda*R/mu \n")
+R= (mu*D_10^2/ (4*n*lambda))
+
+printf(" Radius of curvature of lens is %d cm.\n ",ceil(R))
+
+
+