{InfAlk gyak, 2001. majus 2.}

{Demografia:
- egyetlen populacio
- korcsoportok szerinti megoszlas

Adatok:
  N:   a pop. egyedszama
 T(n): az egyedek kora
 E(i): valaki ekkora valoszinuseggel hal meg "i" evesen
 M(i): "i" eves koraban ekkora valoszinuseggel szuletik vkinek gyereke

Szim. lepes:
  j:=n
  Ciklus i:=1 tol N-ig
    Ha Rnd < E(T(i)) akkor T(i):=0
       kul. ha rnd < M(T(i))
              akkor inc(j) 
                      t(j):=1
            ev.
     ev.
  Cv.
  inc(T(i))
  T-tomorites;
Elj.v.

Jarvany:
Jv: annak a valoszinusege, hogy az adott evben jarvany van.
Jh: a jarvany miatti halal valoszinusege
 Szim. lepes:
   ha rnd < jv akkor Ciklus i:=1 tol N-ig
                        Ha rnd < jh(T(i)) akkor T(i):=0
                     Cv.
   T-tomoritese
   ev.
Elj.v.
}