#!/usr/bin/perl

use strict;

my $depo=0;
my $years=30;
my $mon_pay=3000; # Ежемесячный вклад
my $inf_coeff=0.10; # Коэффициент инфляции  
my $bank_coeff=0.09; # Банковский годовой процент по депозиту
my $compensate=0.10; # Увеличение ежемесячного вклада (в год)

my $mon_bank_coeff=$bank_coeff/12;
my $curr_pay=$mon_pay;
my $inflation=1;
my $y;

for ($y=1;$y <=$years; $y++){
   my $m;
   for ($m=1;$m <= 12; $m++){
         $depo=$depo+$curr_pay; # Платим в начале месяца
  $depo=$depo*(1+$mon_bank_coeff); # В конце месяца нам начисляют проценты  
   }
   print "Год $y: ежемесячный платеж $curr_pay (эффективных ".($curr_pay/$inflation).")\n";
   print "\tДепозит в конце года $depo (эффективный ".($depo/$inflation)."), Инфляция по отношению к началу $inflation \n";
   $curr_pay=$curr_pay*(1+$compensate); # Увеличиваем вклад на следующий год
   $inflation=$inflation*(1+$inf_coeff); # Инфляция по отношению к началу
}

Год 1: ежемесячный платеж 3000 (эффективных 3000)
  Депозит в конце года 37800 (эффективный 37800), Инфляция по отношению к началу 1  
Год 2: ежемесячный платеж 3300 (эффективных 3000)
  Депозит в конце года 82900 (эффективный 75400), Инфляция по отношению к началу 1.1  
Год 3: ежемесячный платеж 3600 (эффективных 3000)
  Депозит в конце года 136500 (эффективный 112800), Инфляция по отношению к началу 1.21  
Год 4: ежемесячный платеж 4000 (эффективных 3000)
  Депозит в конце года 199600 (эффективный 149900), Инфляция по отношению к началу 1.33  
Год 5: ежемесячный платеж 4400 (эффективных 3000)
  Депозит в конце года 273600 (эффективный 186900), Инфляция по отношению к началу 1.46  
Год 6: ежемесячный платеж 4800 (эффективных 3000)
  Депозит в конце года 360200 (эффективный 223700), Инфляция по отношению к началу 1.61  
Год 7: ежемесячный платеж 5300 (эффективных 3000)
  Депозит в конце года 461000 (эффективный 260200), Инфляция по отношению к началу 1.77  
Год 8: ежемесячный платеж 5800 (эффективных 3000)
  Депозит в конце года 577900 (эффективный 296500), Инфляция по отношению к началу 1.95  
Год 9: ежемесячный платеж 6400 (эффективных 3000)
  Депозит в конце года 713100 (эффективный 332700), Инфляция по отношению к началу 2.14  
Год 10: ежемесячный платеж 7100 (эффективных 3000)
  Депозит в конце года 869200 (эффективный 368600), Инфляция по отношению к началу 2.36  
Год 11: ежемесячный платеж 7800 (эффективных 3000)
  Депозит в конце года 1048700 (эффективный 404300), Инфляция по отношению к началу 2.59  
Год 12: ежемесячный платеж 8600 (эффективных 3000)
  Депозит в конце года 1255000 (эффективный 439900), Инфляция по отношению к началу 2.85  
Год 13: ежемесячный платеж 9400 (эффективных 3000)
  Депозит в конце года 1491400 (эффективный 475200), Инфляция по отношению к началу 3.14  
Год 14: ежемесячный платеж 10400 (эффективных 3000)
  Депозит в конце года 1761800 (эффективный 510300), Инфляция по отношению к началу 3.45  
Год 15: ежемесячный платеж 11400 (эффективных 3000)
  Депозит в конце года 2070600 (эффективный 545300), Инфляция по отношению к началу 3.8  
Год 16: ежемесячный платеж 12500 (эффективных 3000)
  Депозит в конце года 2422700 (эффективный 580000), Инфляция по отношению к началу 4.18  
Год 17: ежемесячный платеж 13800 (эффективных 3000)
  Депозит в конце года 2823700 (эффективный 614500), Инфляция по отношению к началу 4.59  
Год 18: ежемесячный платеж 15200 (эффективных 3000)
  Депозит в конце года 3279700 (эффективный 648900), Инфляция по отношению к началу 5.05  
Год 19: ежемесячный платеж 16700 (эффективных 3000)
  Депозит в конце года 3797500 (эффективный 683000), Инфляция по отношению к началу 5.56  
Год 20: ежемесячный платеж 18300 (эффективных 3000)
  Депозит в конце года 4385000 (эффективный 717000), Инфляция по отношению к началу 6.12  
Год 21: ежемесячный платеж 20200 (эффективных 3000)
  Депозит в конце года 5050600 (эффективный 750700), Инфляция по отношению к началу 6.73  
Год 22: ежемесячный платеж 22200 (эффективных 3000)
  Депозит в конце года 5804200 (эффективный 784300), Инфляция по отношению к началу 7.4  
Год 23: ежемесячный платеж 24400 (эффективных 3000)
  Депозит в конце года 6656400 (эффективный 817700), Инфляция по отношению к началу 8.14  
Год 24: ежемесячный платеж 26900 (эффективных 3000)
  Депозит в конце года 7619300 (эффективный 850900), Инфляция по отношению к началу 8.95  
Год 25: ежемесячный платеж 29500 (эффективных 3000)
  Депозит в конце года 8706400 (эффективный 883900), Инфляция по отношению к началу 9.85  
Год 26: ежемесячный платеж 32500 (эффективных 3000)
  Депозит в конце года 9932700 (эффективный 916800), Инфляция по отношению к началу 10.83  
Год 27: ежемесячный платеж 35800 (эффективных 3000)
  Депозит в конце года 11315100 (эффективный 949400), Инфляция по отношению к началу 11.92  
Год 28: ежемесячный платеж 39300 (эффективных 3000)
  Депозит в конце года 12872100 (эффективный 981900), Инфляция по отношению к началу 13.11  
Год 29: ежемесячный платеж 43300 (эффективных 3000)
  Депозит в конце года 14624800 (эффективный 1014100), Инфляция по отношению к началу 14.42  
Год 30: ежемесячный платеж 47600 (эффективных 3000)
  Депозит в конце года 16596400 (эффективный 1046200), Инфляция по отношению к началу 15.86