summaryrefslogtreecommitdiff
path: root/3669/CH14/EX14.10/10.sce
diff options
context:
space:
mode:
Diffstat (limited to '3669/CH14/EX14.10/10.sce')
-rw-r--r--3669/CH14/EX14.10/10.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/3669/CH14/EX14.10/10.sce b/3669/CH14/EX14.10/10.sce
new file mode 100644
index 000000000..92acd4c5c
--- /dev/null
+++ b/3669/CH14/EX14.10/10.sce
@@ -0,0 +1,14 @@
+
+//Variable declaration
+a12=36; //intensity 1
+a22=1; //intensity 2
+
+//Calculation
+a1=sqrt(a12);
+a2=sqrt(a22);
+Imin=(a1-a2)**2; //minimum intensity
+Imax=(a1+a2)**2; //maximum intensity
+r=Imax/Imin;
+
+//Result
+printf('ratio of maximum intensity to minimum intensity is %0.3f \n',(r)) \ No newline at end of file