Est-ce un tableau de proportionnalité ?

Si oui, demande le coefficient de proportionnalité.

Si non, demande le numéro de la colonne qui ne colle pas.

\title{Est-ce un tableau de proportionnalité ? (5x2)}
\language{fr}
\range{-5..5}
\author{Odile Bénassy}
\email{obenassy@free.fr}
\license{GNU GPL}
\computeanswer{no}
\format{html}
\precision{10000}
 
 
\matrix{baselines=1,2,3,4,5
1/3, 1/2, 2/3, 1/6, 5/6
2,3,4,5,6
2,5,7,9,12
}
 
\integer{rownum=random(1..rows(\baselines))}
\matrix{baseline=row(\rownum, \baselines)}
 
\matrix{allcoefs=1/10,1/100,10,100,2,3,4,5,6,1/2,1/4,1/5,20,25,50}
\matrix{allbadcoefs=2/10,2/100,20,110,1.5,4,5,6,5,1/4,1/2,1/4,15,20,40}
 
\matrix{coefnums=1,2,3,4,5,6,7,8,9,10,11,12,13,14,15}
\matrix{coefnums=shuffle(\coefnums)}
\matrix{coefs=item(\coefnums, \allcoefs)}
\rational{coef=item(1,\coefs)}
\matrix{secondline=pari(\coef * [\baseline])}
\matrix{badcoefs=item(\coefnums, \allbadcoefs)}
\rational{badcoef=item(1,\badcoefs)}
\matrix{badline=pari(\badcoef * [\baseline])}
 
Définition d'une cellule qui rompt la proportionnalité
\integer{isnotprop = random(0,1)}
\integer{badcellnum = 0}
\text{rep1 = oui}
\real{rep2 = \coef}
\if{\isnotprop = 1}{
\text{rep1 = non}
\integer{badcellnum = random(1..5)}
\integer{rep2 = \badcellnum}
}

\real{first1 = item(1,\baseline)}
\real{m = 1000 * \first1}
\integer{ent = 1000 * \first1}
\real{test=\m - \ent}
\if{\m - \ent != 0} {\rational{first1 = item(1,\baseline)}}
\real{first2 = item(2,\baseline)}
\real{m = 1000 * \first2}
\integer{ent = 1000 * \first2}
\real{test=\m - \ent}
\if{\test != 0} {\rational{first2 = item(2,\baseline)}}
\real{first3 = item(3,\baseline)}
\real{m = 1000 * \first3}
\integer{ent = 1000 * \first3}
\real{test=\m - \ent}
\if{\test != 0} {\rational{first3 = item(3,\baseline)}}
\real{first4 = item(4,\baseline)}
\real{m = 1000 * \first4}
\integer{ent = 1000 * \first4}
\real{test=\m - \ent}
\if{\test != 0} {\rational{first4 = item(4,\baseline)}}
\real{first5 = item(5,\baseline)}
\real{m = 1000 * \first5}
\integer{ent = 1000 * \first5}
\real{test=\m - \ent}
\if{\test != 0} {\rational{first5 = item(5,\baseline)}}
\real{second1 = item(1,\secondline)}
\if{\badcellnum = 1}{\real{second1 = item(1, \badline)}}
\real{m = 1000 * \second1}
\integer{ent = 1000 * \second1}
\real{test=\m - \ent}
\if{\test != 0} {\rational{second1 = item(1,\secondline)}}
\if{\test != 0 and \badcellnum = 1} {\rational{second1 = item(1,\badline)}}
\real{second2 = item(2,\secondline)}
\if{\badcellnum = 2}{\real{second2 = item(2, \badline)}}
\real{m = 1000 * \second2}
\integer{ent = 1000 * \second2}
\real{test=\m - \ent}
\if{\test != 0} {\rational{second2 = item(2,\secondline)}}
\if{\test != 0 and \badcellnum = 2} {\rational{second2 = item(2,\badline)}}
\real{second3 = item(3,\secondline)}
\if{\badcellnum = 3}{\real{second3 = item(3, \badline)}}
\real{m = 1000 * \second3}
\integer{ent = 1000 * \second3}
\real{test=\m - \ent}
\if{\test != 0} {\rational{second3 = item(3,\secondline)}}
\if{\test != 0 and \badcellnum = 3} {\rational{second3 = item(3,\badline)}}
\real{second4 = item(4,\secondline)}
\if{\badcellnum = 4}{\real{second4 = item(4, \badline)}}
\real{m = 1000 * \second4}
\integer{ent = 1000 * \second4}
\real{test=\m - \ent}
\if{\test != 0} {\rational{second4 = item(4,\secondline)}}
\if{\test != 0 and \badcellnum = 4} {\rational{second4 = item(4,\badline)}}
\real{second5 = item(5,\secondline)}
\if{\badcellnum = 5}{\real{second5 = item(5, \badline)}}
\real{m = 1000 * \second5}
\integer{ent = 1000 * \second5}
\real{test=\m - \ent}
\if{\test != 0} {\rational{second5 = item(5,\secondline)}}
\if{\test != 0 and \badcellnum = 5} {\rational{second5 = item(5,\baddline)}}
                                                                              
\integer{questionnum=random(1,2)}
\if{\questionnum=1}{
\integer{num1=1}
\integer{num2=2}
\real{rep=\coef}
}{
\integer{num1=2}
\integer{num2=1}
\real{rep=1/(\coef)}
}
                                                                              
\steps{choice 1
reply 1
}
                                                                              
\statement{
                                                                              
\if{debug iswordof \oefenv}{
ESSAI : baseline = \baseline
<br>\lenallcoefs
<br>\coefnums, \coefs, \coef
<br>secondline = \secondline
<br>badline = \badline
<br>badcellnum = \badcellnum
<br>\questionnum, coef =\coef, badcoef = \badcoef et (\num1,\num2,\rep)
<br>\test
}
                                                                              
\if{\step<=1}{
<p>Ce tableau de nombres est-il un tableau de proportionnalité ?
}
                                                                              
<p><center>
                                                                              
<table border="1">
<tr><td><font color="purple">Ligne numéro 1</font></td><td>\first1</td><td>\first2</td><td>\first3</td><td>\first4</td><td>\first5</td></tr>
<tr><td><font color="purple">Ligne numéro 2</font></td><td>\second1</td><td>\second2</td><td>\second3</td><td>\second4</td><td>\second5</td></tr>
</table>
                                                                              
</center>
                                                                              
                                                                              
\if{\step=2}{
\if{\badcellnum=0}{
<p>Bien. Dans ce tableau de proportionnalité, quel est le coefficient de proportionnalité qui permet de passer de la ligne numéro \num1 à la ligne numéro \num2 ?
}{
<p>Tu as raison, ce tableau n'est pas un tableau de proportionnalité.
<p>Quel est le numéro de la colonne qui ne colle pas avec les autres ?
}
}
                                                                              
}
                                                                              
\choice{Ma réponse}{\rep1}{oui, non}
\answer{Réponse}{\rep2}{type=numeric}