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 /1970/CH9/EX9.4 | |
| 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 '1970/CH9/EX9.4')
| -rwxr-xr-x | 1970/CH9/EX9.4/CH09Exa4.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/1970/CH9/EX9.4/CH09Exa4.sce b/1970/CH9/EX9.4/CH09Exa4.sce new file mode 100755 index 000000000..c02d1a769 --- /dev/null +++ b/1970/CH9/EX9.4/CH09Exa4.sce @@ -0,0 +1,16 @@ +// Scilab code Exa9.4 : : Page-391 (2011)
+clc; clear;
+A = 77; // Mass number of the isotopes
+Z = round (A/((0.015*A^(2/3))+2)); // Atomic number of stable isotope
+// Check the stability !!!!!
+ if Z == 34 then
+ printf("\nSe( %d,%d) is stable \nAs (%d,%d) and Br(%d,%d) are unstable", Z, A, Z-1, A, Z+1, A);
+ elseif Z == 33 then
+ printf("\nAs( %d,%d) is stable \nSe (%d,%d) and Br(%d,%d) are unstable", Z, A, Z+1, A, Z+2, A);
+ elseif Z == 35 then
+ printf("\nBr( %d,%d) is stable \nSe (%d,%d) and As(%d,%d) are unstable",Z,A,Z-2,A,Z-1,A);
+end
+
+// Result
+// Se( 34,77) is stable
+// As (33,77) and Br(35,77) are unstable
\ No newline at end of file |