Traduire un décimal en lettres (II)

Un décimal est donné en chiffres (par exemple 195200) et l'élève doit le mettre sous la forme "19952 x 100", soit sous la forme "1952 centaines" (en fonction du tirage aléatoire de la question).

\title{Traduire un décimal en lettres (II)}
\language{fr}
\range{-5..5}
\author{Odile Bénassy}
\email{obenassy@free.fr}
\license{GNU GPL}
\computeanswer{no}
\format{html}
\precision{10000}
 
\integer{exonum=random(1..2)}
 
\integer{a = random(101..99999)}
 
\integer{first=-6}
\integer{last=3}
\integer{exp = random(\first..\last)}
\real{x = \a * 10^\exp}
 
\matrix{base1 = 100000000, 10000000, 1000000, 100000, 10000, 1000, 100, 10, 1, 0.1, 0.01, 0.001, 0.0001, 0.00001, 0.000001, 0.0000001, 0.00000001, 0.000000001}
\matrix{base2 = centaines de millions, dizaines de millions, millions, centaines de milliers, dizaines de milliers, milliers, centaines, dizaines, unités, dixièmes, centièmes, millièmes, dix-millièmes, cent-millièmes, millionnièmes, dix-millionnièmes, cent-millionnièmes}
\if{\exonum=1}{\matrix{base=\base1}}{\matrix{base=\base2}}
 
\integer{decalage=9}
 
\text{b = item(\decalage-\exp, \base)}
 
\statement{
 
<p>Traduire le nombre décimal :
 
<p>
 
\x = \a \if{\exonum=1}{x} \embed{choice 1}
 
}
 
\choice{}{\b}{\base}