diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /635/CH8/EX8.8/Ch08Ex8.sci | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '635/CH8/EX8.8/Ch08Ex8.sci')
-rwxr-xr-x | 635/CH8/EX8.8/Ch08Ex8.sci | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/635/CH8/EX8.8/Ch08Ex8.sci b/635/CH8/EX8.8/Ch08Ex8.sci new file mode 100755 index 000000000..ca053cb87 --- /dev/null +++ b/635/CH8/EX8.8/Ch08Ex8.sci @@ -0,0 +1,11 @@ +// Scilab Code Ex8.8 Percentage transmitted energy of X-rays: Page 259 (2010)
+mu = 139; // Attenuation co-efficient of aluminium, per metre
+x = 0.005; // Thickness of aluminium sheet, m
+// If X% is the intensity of the X-ray transmitted through the aluminium sheet then
+// X% = I/I_0
+// or X/100 = exp(-absorb_coeff*x)
+// Solving for X
+X = 100*exp(-mu*x); // Transmitted percentage of X-rays
+printf("\nThe intensity of the X-ray transmitted through the aluminium sheet = %g percent", round(X));
+// Result
+// The intensity of the X-ray transmitted through the aluminium sheet = 50 percent
\ No newline at end of file |