4736.sagews

L=matrix([[0,1,1.5,0,0],[0.9,0,0,0,0],[0,0.8,0,0,0],[0,0,0.7,0,0],[0,0,0,0.5,0]]);L

[0.000000000000000 1.00000000000000 1.50000000000000 0.00 0.00] [0.900000000000000 0.000000000000000 0.000000000000000 0.00 0.00] [0.000000000000000 0.800000000000000 0.000000000000000 0.00 0.00] [0.000000000000000 0.000000000000000 0.700000000000000 0.00 0.00] [0.000000000000000 0.000000000000000 0.000000000000000 0.50 0.00]

L^80

[1.13644646845851e9 1.65739577183596e9 1.29873483611976e9 0 0] [7.79240901671857e8 1.13644646845851e9 8.90519116225633e8 0 0] [4.74943528653671e8 6.92658579263873e8 5.42767057641417e8 0 0] [2.53291293565995e8 3.69400522286189e8 2.89462139898395e8 0 0] [9.64873799661317e7 1.40717385314441e8 1.10266101471203e8 0 0]

X=matrix([[10000],[20000],[15000],[10000],[8000]]);X

[10000] [20000] [15000] [10000] [ 8000]

L^80*X

[6.39934026631007e13] [4.38791251292732e13] [2.67441127364354e13] [1.42628554798596e13] [5.43321302801819e12]