summaryrefslogtreecommitdiff
path: root/3669/CH14/EX14.1/1.sce
diff options
context:
space:
mode:
Diffstat (limited to '3669/CH14/EX14.1/1.sce')
-rw-r--r--3669/CH14/EX14.1/1.sce12
1 files changed, 12 insertions, 0 deletions
diff --git a/3669/CH14/EX14.1/1.sce b/3669/CH14/EX14.1/1.sce
new file mode 100644
index 000000000..7a9c09087
--- /dev/null
+++ b/3669/CH14/EX14.1/1.sce
@@ -0,0 +1,12 @@
+
+//Variable declaration
+I1=10; //intensity(w/m**2)
+I2=25; //intensity(w/m**2)
+
+//Calculation
+a1bya2=sqrt(I1/I2);
+I=((1+a1bya2)**2)/((a1bya2-1)**2); //ratio of maximum intensity to minimum intensity
+
+//Result
+printf('ratio of maximum intensity to minimum intensity is %0.3f \n',(I))
+printf('answer varies due to approximating off errors\n') \ No newline at end of file