### EJEMPLO 8.14
#ejemplo 
#generador de número aleatorios
def iran(j,k) :
   a=int(random()*(k-j+1))+j
   return a
#generador de número aleatorios
def fran(j,k) :
    t=random()
    a=j*t + k*(1.0-t)
    return a
#generador de frecuencias de conversión aleatorias
def pran():
    frecuencias=[["anualmente",1], ["semestralmente",2] , ["trimestralmente",4], ["mensualmente",12], ["diariamente",360]]
    indice=iran(0,4)
    #print indice
    return frecuencias[indice]
###to numeric question
def NM(x):
    sx = str(x)
    tol = x*0.03
    stol = str(tol)
    #print sx, type(sx)
    return "{1:NM:="+sx+":"+stol+"}"

A1 = 1000; T1 = 1
A2 = 3000; T2 = 4
A = 2000; T=2
r=0.05
N=2
i=r/N
deuda = A1*(1+i)**((T-T1)*N) + A2*(1+i)**((T-T2)*N); print deuda

S=A*(1+i)**(T*N); print S
X=deuda-S; print X

def mf10204():
    frq = pran(); sfrq = frq[0]; N = frq[1]
    r=round(fran(0,1),4); i=r/N
    A1 = iran(1000,10000); T1 = iran(2,10)
    T = iran(T1,T1+10)
    A2 = iran(A1, A1+10000); T2 = iran(T, T+10)
    deuda = A1*(1+i)**((T-T1)*N)+A2*(1+i)**((T-T2)*N)
    A = iran (0, deuda/(1+i)**(T*N))
    S = A*(1+i)**(T*N)
    X = deuda-S
    #print sfrq, N
    #print A1, A2, A, S, deuda, X
    #print T1, T, T2
    print "Una persona debe $"+str(A1)+" pagaderos en "+str(T1)+" años y" 
    print "$"+str(A2)+" pagaderos en "+str(T2)+" años." 
    print "Acuerdan pagar de inmediato $"+str(A)+" de inmediato y el resto en"
    print str(T)+" años. ¿Cuánto tendrá que pagar al final del año "+str(T)+" suponiendo un"
    print "rendimiento de "+str(r*100)+"% convertible "+sfrq+"?"
    print "Respuesta: "+NM(X)

def tomoodle(leyenda, f):
    import datetime as dt
    leyenda=str(leyenda)
    k=str(dt.datetime.now())
    print "<!-- question: 0000000  -->"
    print "<question type=\"cloze\">"
    print "<name>"
    print "<text>"+leyenda+k+"</text>"
    print "</name>"
    print "<questiontext format=\"html\">"
    print "<text><![CDATA[<pre>"
    f()
    print "</pre>"
    print "<p> </p>]]></text>"
    print "</questiontext>"
    print "<generalfeedback format=\"html\">"
    print "<text><![CDATA[<pre> </pre>]]></text>"
    print "</generalfeedback>"
    print "<penalty>0.3333333</penalty>"
    print "<hidden>0</hidden>"
    print "</question>"

def toMoodle(K, leyenda, f):
    leyenda=str(leyenda)
    print "<?xml version=\"1.0\" encoding=\"UTF-8\"?>"
    print "<quiz>"
    for k in range(K):
        tomoodle(leyenda, f)
    print "</quiz>"

toMoodle(50, "MF1-02-04-", mf10204)