Texas Instruments TI-89 Titanium Manual De Uso página 847

= capital final y
temp5
0 = fin de mes).
:tvm(temp1,temp2,temp3,temp4,temp5,temp6)
:Func
:Local tempi,tempfunc,tempstr1
:Ltemp3+(1+temp2/1200†temp6)†temp4†((1N(1+temp2/1200)^
(Ltemp1))/(temp2/1200))Ntemp5†(1+temp2/1200)^(Ltemp1)
!tempfunc
:For tempi,1,5,1
:"temp"&exact(string(tempi))!tempstr1
:If when(#tempstr1=0,false,false,true) Then
:If tempi=2
:Return approx(nsolve(tempfunc=0,#tempstr1) | #tempstr1>0
and #tempstr1<100)
:Return approx(nsolve(tempfunc=0,#tempstr1))
:EndIf
:EndFor
:Return "parameter error"
:EndFunc
Nota: Puede usar el teclado de su ordenador para escribir textos largos y después
emplear el software de TI Connect™ para enviarlos a la TI-89 Titanium / Voyage™ 200.
Actividades
= principio o fin del periodo de pago (1 = principio de mes,
temp6
845