{VERSION 6 0 "IBM INTEL NT" "6.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 
0 0 1 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 }
{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 
2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 
11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 3 0 
0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 12 1 {CSTYLE "" -1 
-1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 3 0 0 0 0 1 0 1 0 2 2 
0 1 }{PSTYLE "Maple Plot" -1 13 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 
1 2 2 2 2 2 2 1 1 1 1 }3 1 0 0 0 0 1 0 1 0 2 2 0 1 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "rce:=10000-sum(1000*
(1+xi)^(-t/12),t=0..10)=0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$rceG/
$!)zc]d!\"&\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "fsolve(
rce);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+I\">ti#!#5" }}}{EXCHG 
{PARA 0 "" 0 "" {TEXT -1 49 "navyseni 10% zde odpovida rocni urokove s
azbe 26%" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 38 "Mesicnhi periodicita \+
anuitnich splatek" }{MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 46 "rce:=20000-sum(1000*(1+xi)^(-t/12),t=0..10)=0;" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%$rceG/,8\"&+!>\"\"\"*&\"%+5F(,&F(F(%
#xiGF(#!\"\"\"#7F.*&F*F(F+#F.\"\"'F.*&F*F(F+#F.\"\"%F.*&F*F(F+#F.\"\"$
F.*&F*F(F+#!\"&F/F.*&F*F(F+#F.\"\"#F.*&F*F(F+#!\"(F/F.*&F*F(F+#!\"#F8F
.*&F*F(F+#!\"$F5F.*&F*F(F+#F;F2F.\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 192 "Phi:=p
roc(Z,eta,N)# Pujcena castka, navyseni, Pocet splatek\nlocal x,rce,t,K
,xi;\nx:=Z*(1+eta)/N; # splatky jsou Z*(1+eta)/N\nrce:=Z-\nsubs(K=N-1,
sum(x*(1+xi)^(-t/12),t=0..K))\n=0;\nfsolve(rce)\nend;" }}{PARA 11 "" 
1 "" {XPPMATH 20 "6#>%$PhiGj+6%%\"ZG%$etaG%\"NG6'%\"xG%$rceG%\"tG%\"KG
%#xiG6\"F0C%>8$*(9$\"\"\",&F6F69%F6F69&!\"\">8%/,&F5F6-%%subsG6$/8',&F
9F6F6F:-%$sumG6$*&F3F6),&F6F68(F6,$*&#F6\"#7F68&F6F:F6/FP;\"\"!FCF:FS-
%'fsolveG6#F " 0 "" {MPLTEXT 1 0 
91 "for k from 2 to 20 do\nz[k]:=[k,Phi(10000,0.1,k)];\nif k mod 10 = \+
0 then print(k,z[k]);fi\nod:" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$\"#57$
F#$\"+QC:gH!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$\"#?7$F#$\"+:E7/8!#5
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 12 "with(plots);" }}{PARA 12 "" 1 "" {XPPMATH 20 "
6#7fn%(animateG%*animate3dG%-animatecurveG%&arrowG%-changecoordsG%,com
plexplotG%.complexplot3dG%*conformalG%,conformal3dG%,contourplotG%.con
tourplot3dG%*coordplotG%,coordplot3dG%-cylinderplotG%,densityplotG%(di
splayG%*display3dG%*fieldplotG%,fieldplot3dG%)gradplotG%+gradplot3dG%,
graphplot3dG%-implicitplotG%/implicitplot3dG%(inequalG%,interactiveG%2
interactiveparamsG%-listcontplotG%/listcontplot3dG%0listdensityplotG%)
listplotG%+listplot3dG%+loglogplotG%(logplotG%+matrixplotG%)multipleG%
(odeplotG%'paretoG%,plotcompareG%*pointplotG%,pointplot3dG%*polarplotG
%,polygonplotG%.polygonplot3dG%4polyhedra_supportedG%.polyhedraplotG%'
replotG%*rootlocusG%,semilogplotG%+setoptionsG%-setoptions3dG%+spacecu
rveG%1sparsematrixplotG%+sphereplotG%)surfdataG%)textplotG%+textplot3d
G%)tubeplotG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "Phi(10000,0
,11);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%'fsolveG6$/,(\"&++\"\"\"\"*
*F(F)\"#6!\"\",&F)F)%#xiGF)#!\"&\"\"',&F)F,*$)F-#F)\"#7F)F)F,F)**F(F)F
+F,F-F5F2F,F,\"\"!F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "poi
ntplot(\n[seq(z[i],i=2..20)]\n)\n;" }}{PARA 13 "" 1 "" {GLPLOT2D 450 
450 450 {PLOTDATA 2 "6#-%'POINTSG657$$\"\"#\"\"!$\"+u_A65!\")7$$\"\"$F
)$\"+*=MEE#!\"*7$$\"\"%F)$\"+(Qx(*=\"F27$$\"\"&F)$\"+nk#4(z!#57$$\"\"'
F)$\"+*\\j,(fF=7$$\"\"(F)$\"+(pw\\w%F=7$$\"\")F)$\"+#=Y<'RF=7$$\"\"*F)
$\"+'\\E*)Q$F=7$$\"#5F)$\"+QC:gHF=7$$\"#6F)$\"+K\">ti#F=7$$\"#7F)$\"+T
#[:O#F=7$$\"#8F)$\"+/;ZW@F=7$$\"#9F)$\"+ug&Q'>F=7$$\"#:F)$\"+aIC6=F=7$
$\"#;F)$\"+8*)f!o\"F=7$$\"#lo9F=7$$\"#>F
)$\"+%H7:Q\"F=7$$\"#?F)$\"+:E7/8F=" 1 2 0 1 10 0 2 9 1 4 2 1.000000 
45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 59 "for Z from 10000 by 10000 to 100000 do\nZ,Phi(Z,0.1,1
1);\nod;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$\"&++\"$\"+K\">ti#!#5" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6$\"&++#$\"+K\">ti#!#5" }}{PARA 11 "" 1 
"" {XPPMATH 20 "6$\"&++$$\"+K\">ti#!#5" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6$\"&++%$\"+K\">ti#!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$\"&++&$
\"+K\">ti#!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$\"&++'$\"+K\">ti#!#5
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$\"&++($\"+K\">ti#!#5" }}{PARA 11 "
" 1 "" {XPPMATH 20 "6$\"&++)$\"+K\">ti#!#5" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6$\"&++*$\"+K\">ti#!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6
$\"'++5$\"+K\">ti#!#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 96 "fo
r xi from 0.01 by 0.01 to 0.1 do ;\nL:=30;K:=2:\nM:=(K+L)/2:\nA:=Phi(1
0,xi,L):\nB:=Phi(1,xi,K): \n\n" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 262 "
if Axi then;\n  while L-K>1 do\n    if Phi(1,xi,M)xi);\nfi;\n\n\nprint(M,Phi(1,xi,M)=xi);\nod
;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"LG\"#I" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%\"KG\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"MG\"
#;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG$\"+hq_$G)!#7" }}{PARA 11 
"" 1 "" {XPPMATH 20 "6#>%\"BG$\"+wKf7F!#5" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6$$\"+++v=D!\")/$\"+!Hl+%**!#7$\"\"\"!\"#" }}{PARA 11 "" 
1 "" {XPPMATH 20 "6#>%\"LG\"#I" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"
KG\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"MG\"#;" }}{PARA 11 "" 
1 "" {XPPMATH 20 "6#>%\"AG$\"+A,Ee;!#6" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#>%\"BG$\"+v'y<;'!#5" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$$\"+++v=D
!\")/$\"+Qdb\"*>!#6$\"\"#!\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"L
G\"#I" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"KG\"\"#" }}{PARA 11 "" 1 
"" {XPPMATH 20 "6#>%\"MG\"#;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG
$\"+%\"BG$\"+ns([0\"!\"*
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$$\"+++v=D!\")/$\"+%)fo#*H!#6$\"\"$
!\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"LG\"#I" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#>%\"KG\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"MG
\"#;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG$\"+X\"oGK$!#6" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#>%\"BG$\"+.`.8;!\"*" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6$$\"+++v=D!\")/$\"+5bV(*R!#6$\"\"%!\"#" }}{PARA 11 "" 1 
"" {XPPMATH 20 "6#>%\"LG\"#I" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"KG
\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"MG\"#;" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#>%\"AG$\"+&=Kw:%!#6" }}{PARA 11 "" 1 "" {XPPMATH 20 "
6#>%\"BG$\"+6PWBB!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$$\"+++v=D!\")
/$\"+fB%e+&!#6$\"\"&!\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"LG\"#I
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"KG\"\"#" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%\"MG\"#;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG$\"
+2z2%*\\!#6" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"BG$\"+F8,GK!\"*" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6$$\"+++v=D!\")/$\"+QW%z,'!#6$\"\"'!\"#
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"LG\"#I" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%\"KG\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"MG\"
#;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG$\"+=hBKe!#6" }}{PARA 11 "
" 1 "" {XPPMATH 20 "6#>%\"BG$\"+fGM!Q%!\"*" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6$$\"+++v=D!\")/$\"+E%zP.(!#6$\"\"(!\"#" }}{PARA 11 "" 1 
"" {XPPMATH 20 "6#>%\"LG\"#I" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"KG
\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"MG\"#;" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#>%\"AG$\"+'>P@n'!#6" }}{PARA 11 "" 1 "" {XPPMATH 20 "
6#>%\"BG$\"+mE1\\e!\"*" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$$\"+++v=D!\"
)/$\"+Q\\Q`!)!#6$\"\")!\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"LG\"
#I" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"KG\"\"#" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%\"MG\"#;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG$\"
+e7\"Q^(!#6" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"BG$\"+wT5Ax!\"*" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6$$\"+++v=D!\")/$\"+N%)zw!*!#6$\"\"*!\"#
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"LG\"#I" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%\"KG\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"MG\"
#;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"AG$\"+)4)Gd$)!#6" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#>%\"BG$\"+u_A65!\")" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6$$\"+++v=D!\")/$\"+HdS55!#5$\"#5!\"#" }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 37 "\n\nPhi(1,0.1,K)=0.1;\nPhi(1,0.1,L)=0.1;" }
}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"K
G\"#I" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"LG\"\"#" }}{PARA 11 "" 1 
"" {XPPMATH 20 "6#/$\"+)4)Gd$)!#6$\"\"\"!\"\"" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#/$\"+u_A65!\")$\"\"\"!\"\"" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 14 "x:=2;\nG(3):\nx;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6
#>%\"xG\"\"#" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"\"" }}{PARA 11 "" 
1 "" {XPPMATH 20 "6#\"\"#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 
"" }}}}{MARK "14 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }
{PAGENUMBERS 0 1 2 33 1 1 }