Rev 3049 | Rev 5764 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
!!! fichier de présentation de l'étape 3 !!!
<center>
<b><font color=darkcyan size=+1> Etape $etape: <u>saisie des bonnes réponses</u> </font></b>
<br>
<table>
<tr>
<td bgcolor=lightblue>
Indiquez pour la question ci-dessous, la liste des
réponses valides (c-à-d considérées comme justes) pour cette question, en
cochant les bonnes cases.
</td>
</tr>
</table>
</center>
<br>
!set obtemp=!line $[$chronobs+1] of $obsrecord
!set obtemp=!trim $obtemp
!set obtemp=!char 2 to -2 of $obtemp
!set L=!line $[$chronobs+1] of $propsrepList
!for i=1 to $[$propsnb+1]
!set prop=!line $i of $propsrecord
!set prop=!trim $prop
!if ; isin $prop
!set p$(i)=!char 2 to -2 of $prop
!else
!set p$(i)=$prop
!endif
!next i
!set indictemp=!trim $(indicList[$[$chronobs+1];])
!set com=!char 4 to -2 of $indictemp
!set indictemp=!trim $com
<table border=1>
<tr>
<th style="text-align:center;background-color:lightblue">
Question
</th>
<th align="center" bgcolor=wheat>
Réponses
</th>
</tr>
<tr>
<td bgcolor=lightblue width="30%">
<table>
<tr>
<td bgcolor=white>
$obtemp
</td>
</tr>
</table>
</td>
<td bgcolor=darkcyan align="center">
<table cellpadding=4>
!for i=1 to $rowsnb
!set bg$(i)=$(coulors[$[((2*$i-1)%3)+1];])
!set bg2$(i)=$(coulors[$[((2*$i)%3)+1];])
<tr>
<td bgcolor="$(bg$(i))">
<input type="checkbox" name="propsrep" value=$i
!if $i isitemof $L
checked
!endif
/>
</td>
<td bgcolor="$(bg$(i))">
$(p$(i))
</td>
<td>
</td>
<td bgcolor="$(bg2$(i))">
<input type="checkbox" name="propsrep" value=$[$i+$rowsnb]
!if $[$i+$rowsnb] isitemof $L
checked
!endif
/>
</td>
<td bgcolor="$(bg2$(i))">
$(p$[$i+$rowsnb])
</td>
</tr>
!next i
!if $extrarow!=0
<tr>
<td align="center" bgcolor="$(coulors[$[($propsnb+1)%3+1];])" colspan=5>
<input type="checkbox" name="propsrep" value=$[$propsnb+1]
!if [$propsnb+1] isitemof $L
checked
!endif
/>
$(p$[$propsnb+1])
</td>
</tr>
!endif
</table>
</td>
</tr>
<tr>
<td colspan=2 bgcolor=white>
<hr>
Saisir ici si besoin, une indication pour cette question:
<br>
<center>
!set wims_backslash_insmath=no
!set indictemp=!reinput $indictemp
<textarea name="exo_indic" rows=5 cols=60>$indictemp</textarea>
!set wims_backslash_insmath=yes
</center>
</td>
</tr>
</table>
!read comsDir/valideb