program population
 
!----------------------------------------------------------------
!Created by Ted Hertel
!ENGR 225 5-8pm Lab
!
!This program will calculate the population growth(P)
!Given the following inputs:
!       Initial population : InlPop
!       Growth Rate:(b-d)
!               b : birthrate
!               d : deathrate
!       Time period: t
!Output: population growth: p
!
!----------------------------------------------------------------
 
implicit none
real::p,inlpop,b,d,t
 
!Get inputs
write (*,*) "Enter Initial Population, Birthrate, Deathrate, and Time period"
read (*,*) inlpop, b, d, t
 
!Compute population growth
p = inlpop * exp((b - d) * t)
 
!Display outputs
Write (*,*) "The population growth is "
write (*,*) p
 
 
 
end program population
 
 

cHJvZ3JhbSBwb3B1bGF0aW9uCgohLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLQohQ3JlYXRlZCBieSBUZWQgSGVydGVsCiFFTkdSIDIyNSA1LThwbSBMYWIKIQohVGhpcyBwcm9ncmFtIHdpbGwgY2FsY3VsYXRlIHRoZSBwb3B1bGF0aW9uIGdyb3d0aChQKQohR2l2ZW4gdGhlIGZvbGxvd2luZyBpbnB1dHM6CiEgICAgICAgSW5pdGlhbCBwb3B1bGF0aW9uIDogSW5sUG9wCiEgICAgICAgR3Jvd3RoIFJhdGU6KGItZCkKISAgICAgICAgICAgICAgIGIgOiBiaXJ0aHJhdGUKISAgICAgICAgICAgICAgIGQgOiBkZWF0aHJhdGUKISAgICAgICBUaW1lIHBlcmlvZDogdAohT3V0cHV0OiBwb3B1bGF0aW9uIGdyb3d0aDogcAohCiEtLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tCgppbXBsaWNpdCBub25lCnJlYWw6OnAsaW5scG9wLGIsZCx0CgohR2V0IGlucHV0cwp3cml0ZSAoKiwqKSAiRW50ZXIgSW5pdGlhbCBQb3B1bGF0aW9uLCBCaXJ0aHJhdGUsIERlYXRocmF0ZSwgYW5kIFRpbWUgcGVyaW9kIgpyZWFkICgqLCopIGlubHBvcCwgYiwgZCwgdAoKIUNvbXB1dGUgcG9wdWxhdGlvbiBncm93dGgKcCA9IGlubHBvcCAqIGV4cCgoYiAtIGQpICogdCkKCiFEaXNwbGF5IG91dHB1dHMKV3JpdGUgKCosKikgIlRoZSBwb3B1bGF0aW9uIGdyb3d0aCBpcyAiCndyaXRlICgqLCopIHAKCgoKZW5kIHByb2dyYW0gcG9wdWxhdGlvbgoK

NTAsMTMsMTIsMQo=

50,13,12,1