diff options
Diffstat (limited to '1970/CH13/EX13.1')
| -rwxr-xr-x | 1970/CH13/EX13.1/CH13Exa1.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/1970/CH13/EX13.1/CH13Exa1.sce b/1970/CH13/EX13.1/CH13Exa1.sce new file mode 100755 index 000000000..4e6cae307 --- /dev/null +++ b/1970/CH13/EX13.1/CH13Exa1.sce @@ -0,0 +1,15 @@ +// Scilab code Exa13.1 : : Page-600 (2011) +clc; clear; +E = 200*1.6023e-13; // Energy released per fission, joule +E_t = 2; // Total power produced, watt +R_fiss = E_t/E; // Fission rate, fissions per sec +m = 0.5; // Mass of uranium, Kg +M = 235; // Mass number of uranium +N_0 = 6.023e+26; // Avogadro's number, per mole +N = m/M*N_0 // Number of uranium nuclei +E_rel = N*E/4.08*10^-3; // Energy released, kilocalories +printf("\nThe rate of fission of U-235 = %4.2e fissions per sec \nEnergy released = %e kcal", R_fiss, E_rel); + +// Result +// The rate of fission of U-235 = 6.24e+010 fissions per sec +// Energy released = 1.006535e+010 kcal
\ No newline at end of file |