blob: c9209ff5c2b7f8b90edfb3daeaab84b85a9ba097 (
plain)
1
2
3
4
5
6
7
8
|
// Scilab Code Ex16.9: Page-604(2014)
clc; clear;
H0 = 71; // Hubble cinstant, km/s per Mpc
tau = 1/H0*1e+006*3.26*9.46e+012/3.16e+007; // The upper limit of the age of the universe, y
printf("\nThe upper limit of the age of the universe = %4.2e y", tau);
// Result
// The upper limit of the age of the universe = 1.37e+010 y
|
