1 files changed, 14 insertions, 0 deletions
diff --git a/24/CH34/EX34.3/Example34_3.sce b/24/CH34/EX34.3/Example34_3.sce
new file mode 100755
index 000000000..5a6b47826
--- /dev/null
+++ b/24/CH34/EX34.3/Example34_3.sce
@@ -0,0 +1,14 @@
+exec('degree_rad.sci', -1)
+
+//Given that
+theta1 = dtor(60)
+theta2 = dtor(90-60)
+I = 1  //(say)
+
+//Sample Problem 34-3
+printf("**Sample Problem 34-3**\n")
+//half of the original intensity, from the one-half rule
+I1 = I/2  
+I2 = I1*cos(theta1)^2
+I3 = I2*cos(theta2)^2
+printf("The ratio of the initial inensity to the final intensity of the light is %.4f", I3)
+\ No newline at end of file