Uvažujme nějakou půjčku, kterou chceme dlouhodobě splácet. Současná hodnota všech
   splátek při smluvené úrokové míře je rovna současné hodnotě půjčky:

   > restart;

   A := subs(N = 12*PocetLet, simplify(sum(x*(1+xi)^(-1/12*t), t = 1 .. N)));

   Dluh := unapply(A, x, xi, PocetLet);

   

   >

   tj. můžeme si půjčit

   >

   násobek toho, co budeme měsíčně splácet.

   Pokud nám někdo jiný nabídne půjčit peníze s úrokovou mírou 0.025, bude současná hodnota
   všech splátek, čili to, co si můžeme půjčit

   >

   což je

   >

   někdo by řekl o dvanáct procent víc.

   Budeme se obecněji zabývat tímto problémem: jak se projeví změna ůrokové sazby na velikosti
   současné hodnotz nějakého finančního toku, zejména pokud je tento tok půjčkou a splácením
   dluhu.

   >

   Příklad:

   >

   Warning, the name changecoords has been redefined

   >

   >

   > A:=plot(subs(T=20,zeta=0.04,f),delta=-0.5..0.5,color=red);

   B:=plot(subs(T=30,zeta=0.04,f),delta=-0.5..0.5,color=blue);

   C:=plot(subs(T=20,zeta=0.05,f),delta=-0.5..0.5,color=navy);

   display(A,B,C);

   >

   To náfffe11m dáfffe11váfffe11 prvnífffe1d