\embed{definition}{ }

    \title{Texte à trous (dictée)}

    \text{cnt_record = \wims(\recordcnt data)}
    \text{H = \randint(\\cnt_record)}
    \text{texte = \wims(\record \\H of data)}
    \text{bande = \wims(\word 1 of \\texte)}
    \text{texte = \wims(\replace \internal \\bande \by in \\texte)}

    \matrix{texte = \slib(text/cutchoices \\texte)}
    \text{cntrow = \rows(\\texte)}
    \integer{cntQ = \\cntrow/2-1}
    \text{trou = }
    \\for{i = 1 to \\cntQ}{
      \text{trou1 = \\texte[2*\\i;]}
      \text{trou = \\trou, \\trou1}
     }
    \text{trou = \wims(\nonempty items \\trou)}

    \text{audio = \slib(media/audio \\bande )}
    \text{STEP = \wims(\makelist r x for x = 1 to \\cntQ)}

    \steps{\\STEP}

    \statement{ Ecouter \\audio et compléter le texte:

    <p style="background-color : #AAFFFF;
    padding : 1%;
    margin : 5% 15%;">
    \\for{k = 1 to \\cntQ}{
        \\texte[2*\\k-1;]  \\embed{\\STEP[\\k], 10}
     }
    \\texte[2*\\cntQ+1;]
    </p>
    }

    \answer{}{\\trou[1]}{type=case}
    \answer{}{\\trou[2]}{type=case}
    \answer{}{\\trou[3]}{type=case}
    \answer{}{\\trou[4]}{type=case}
    \answer{}{\\trou[5]}{type=case}
    \answer{}{\\trou[6]}{type=case}
    \answer{}{\\trou[7]}{type=case}
    \answer{}{\\trou[8]}{type=case}
    \answer{}{\\trou[9]}{type=case}
    \answer{}{\\trou[10]}{type=case}
    \answer{}{\\trou[11]}{type=case}
    \answer{}{\\trou[12]}{type=case}
    \answer{}{\\trou[13]}{type=case}
    \answer{}{\\trou[14]}{type=case}
    \answer{}{\\trou[15]}{type=case}
    \answer{}{\\trou[16]}{type=case}
    \answer{}{\\trou[17]}{type=case}
    \answer{}{\\trou[18]}{type=case}
    \answer{}{\\trou[19]}{type=case}
    \answer{}{\\trou[20]}{type=case}