|
FOURTH-LEVEL GROUPS IN THE FIRST YEAR, continued
As in the previous program for finding the populations of 2-A and 3-C at the
end of the first "year", we now calculate fourth-level groups, but from 2-B and 3-D:
4-J, 4-K, and 4-L
rem finds populations of 3-D, 4-J, 4-K, and 4-L at the end of "year one"
rem "population" means 2-B, while D3 and J4 refer to 3-D and 4-J, etc
countit = 0
original = 5.49450549*10^16
rem 5.49450549*10^16 2-B per saturation cycle of 1-A
population = 0
D3 = 0
J4 = 0
K4 = 0
L4 = 0
[start]
population = population + original
D3 = D3 + (population/(1.82 * 10^12))
D3 = D3 * 1.01
J4 = J4 + (D3/(1.82 * 10^12))
J4 = J4 * 1.02
K4 = K4 + (D3/(1.82 * 10^12))
K4 = K4 * 1.01
L4 = L4 + (D3/(1.96 * 10^14))
L4 = L4 * 1.02
countit = countit + 1
IF countit = 1000 then [end]
GOTO [start]
[end]
print D3
print J4
print K4
print L4
end
answers:
6.45130858*10e12 (3-D)
1769823.16 or about 1.77*10e6 4-J
2865.79124 or about 2.87*10e3 4-K
16434.0722 or about 1.64*10e4 4-L
|
|
