diff options
Diffstat (limited to '3537/CH1/EX1.32/Ex1_32.sce')
| -rw-r--r-- | 3537/CH1/EX1.32/Ex1_32.sce | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/3537/CH1/EX1.32/Ex1_32.sce b/3537/CH1/EX1.32/Ex1_32.sce new file mode 100644 index 000000000..33b2dc8a7 --- /dev/null +++ b/3537/CH1/EX1.32/Ex1_32.sce @@ -0,0 +1,11 @@ +//Example 1_32
+clc();
+clear;
+//To find the radius of curvature of the lens
+lemda=5900 //units in angstroam
+lemda=5900*10^-10 //units in meters
+D=0.5 //units in centimeters
+D=0.5*10^-2 //units in meters
+n=10
+R=D^2/(4*n*lemda)
+printf("The radius of the curvature of lens is %.3f meters",R)
|