summaryrefslogtreecommitdiff
path: root/1958/CH17/EX17.4/Chapter17_example4.sce
diff options
context:
space:
mode:
Diffstat (limited to '1958/CH17/EX17.4/Chapter17_example4.sce')
-rwxr-xr-x1958/CH17/EX17.4/Chapter17_example4.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/1958/CH17/EX17.4/Chapter17_example4.sce b/1958/CH17/EX17.4/Chapter17_example4.sce
new file mode 100755
index 000000000..124b5289a
--- /dev/null
+++ b/1958/CH17/EX17.4/Chapter17_example4.sce
@@ -0,0 +1,13 @@
+clc
+clear
+//Input data
+w1=2//Wavelength in Angstrom
+Z1=24//Target one
+Z2=42//Target two
+a=1//Constant value
+
+//Calculations
+w2=w1*((Z1-a)/(Z2-a))^2//Wavelength in Angstrom
+
+//Output
+printf('Wavelength is %3.2f Angstrom',w2)