n, i=var("n,i")
s(n,i)=((1+i)**n-1)/(i)
a(n,i)=s(n,i)/(1+i)**n
"""
La renta semestral de un edificio es $41000.0 pagaderos por adelantado,
esto es, al principio de cada semestre. ¿Cuál es la renta equivalente de 7 años,
pagada por adelantado al principio del primer año, al 25.2% convertible semestralmente?
"""
n, i=var("n,i")
s(n,i)=((1+i)**n-1)/(i)
a(n,i)=s(n,i)/(1+i)**n
R=41000
N=2
T=7
r=0.252
n=N*T; print "n=", n
i=r/N; print "i=", i
A_anticipada=R*a(n-1,i)+R; print A_anticipada
"""
Al inicio de cada cuatrimestre, una persona invierte $4700.0 en un fondo que
paga el 8.9% convertible cuatrimestral. ¿Cuánto habrá en el fondo
después de 10 años?
"""
R=4700
N=3
r=0.0890
T=10
n=N*T; print "n=", n
i=r/N; print "i=", i
S_anticipada=R*s(n+1,i)-R; print S_anticipada
"""
Un puente recién construido no necesitará reparación hasta el término
de 8 años, cuando requerirá $5100.0 para reparaciones.
Se estima que de ahí en adelante, se necesitará $5100.0 al final de cada
semestre en los próximos 28 años.
Hallar el valor presente del mantenimiento del puente, sobre la
base del 1.06%.
"""
R=5100
N=2
To=8 #año en el que comenzará a necesitar manteniemiento
dT=28 #número de años durante los cuales necesitará manteniemiento
r=0.0106
i=r/N; print i
no=N*To; print no
dn=N*dT; print dn
X=R+R*a(dn, i); print X
A=X*(1+i)**(-no); print A