Rev 12168 | Rev 13716 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
11375 | bpr | 1 | type=question |
12168 | mquerol | 2 | textarea="instruction data1 data2 data3 data4 data5 data6 data7 data8 data9 data10" |
3 | asis="data1 data2 data3 data4 data5 data6 data7 data8 data9 data10" |
||
4 | :Diverses preguntes consecutives, totes del tipus QCM |
||
3445 | bpr | 5 | |
12168 | mquerol | 6 | <p>Aquest exercici presenta preguntes d'opció múltiple.</p> |
7 | <p>El nombre de preguntes està limitat a 10. Es pot triar el nombre de preguntes |
||
8 | que es presentarà a cada exercici. Aquestes preguntes es realitzaran de forma aleatòria o no.</p> |
||
9 | <p>Autor del model : Bernadette Perrin-Riou <bpr@math.u-psud.fr></p> |
||
3445 | bpr | 10 | |
11 | :%%%%%%%%%%%%%%%%% ATTENTION %%%%%%%%%%%%%%%%%%%% |
||
12 | |||
13 | Enlevez l'en-tête ci-dessus si vous détruisez les balises pour le modèle ! |
||
14 | (Ce sont les lignes qui commencent par un ':'.) |
||
15 | Sinon l'exercice risque de ne pas pouvoir repasser sous Createxo. |
||
16 | |||
17 | :%%%%%%%% Paramètres d'exemples à redéfinir %%%%%%%%%%%%%%%%% |
||
18 | |||
12168 | mquerol | 19 | :\title{Opció múltiple avançada} |
5147 | bpr | 20 | :\author{Bernadette, Perrin-Riou} |
3445 | bpr | 21 | :\email{bpr@math.u-psud.fr} |
12168 | mquerol | 22 | :\credits{Image de Pfly [CC BY-SA 2.5], via Wikimedia Commons} |
23 | :Instruccions Globals |
||
24 | Escriviu aquí una instrucció comuna a totes les preguntes de l'exercici |
||
9980 | obado | 25 | $embraced_randitem |
12168 | mquerol | 26 | \text{instruction=Respondre cada pregunta de la primera sèrie, validar i respondre les preguntes de la segona sèrie.} |
3445 | bpr | 27 | |
12168 | mquerol | 28 | :Ordre aleatori |
29 | Trieu "sí" per activar l'aleatorietat de les preguntes. |
||
30 | Trieu "no" per presentar-les en l'ordre en què es van entrar. |
||
31 | \text{alea=item(1,sí,no)} |
||
3451 | obado | 32 | |
12168 | mquerol | 33 | :Nombre màxim de preguntes per etapa |
34 | WIMS dividirà automàticament el vostre exercici en etapes en funció del nombre total de preguntes establertes i del nombre de preguntes per etapa. |
||
35 | \text{N=3} |
||
3451 | obado | 36 | |
12168 | mquerol | 37 | :Nombre màxim d'etapes |
38 | WIMS dividirà automàticament el vostre exercici en etapes en funció del nombre total de preguntes establertes i del nombre de preguntes per etapa. |
||
3445 | bpr | 39 | \text{MAX=2} |
3451 | obado | 40 | |
12168 | mquerol | 41 | :Text al costat de la resposta donada un cop l'alumne ha respost. |
42 | Aquestes paraules intervenen una vegada que les preguntes han estat respostes. |
||
43 | És recomanable provar l'exercici de demostració amb |
||
44 | respostes correctes i incorrectes per entendre on intervenen aquestes paraules. |
||
45 | \text{qcm_prompt1=La vostra resposta:} |
||
3451 | obado | 46 | |
12168 | mquerol | 47 | :Text per al feedback per a "La resposta correcta" |
3451 | obado | 48 | |
12168 | mquerol | 49 | \text{qcm_prompt2=La(es) resposta(es) correcta(es) era(en):} |
3451 | obado | 50 | |
12168 | mquerol | 51 | :Text per al feedback per a "La resposta correcta" |
3451 | obado | 52 | |
12168 | mquerol | 53 | \text{good_answer_text=Resposta correcta!} |
3451 | obado | 54 | |
12168 | mquerol | 55 | :Text per al feedback per a "Resposta incorrecta" |
3451 | obado | 56 | |
12168 | mquerol | 57 | \text{bad_answer_text=Resposta incorrecta!} |
3451 | obado | 58 | |
12168 | mquerol | 59 | :Text per al feedback per a "Resposta incompleta" |
3451 | obado | 60 | |
12168 | mquerol | 61 | \text{incomplete_answer_text=Resposta incompleta...} |
3451 | obado | 62 | |
12168 | mquerol | 63 | :Estil CSS per a les preguntes |
3451 | obado | 64 | |
12168 | mquerol | 65 | \text{style_question=background-color: #F2F9FC;} |
3451 | obado | 66 | |
12168 | mquerol | 67 | :Estil CSS per a les respostes |
3451 | obado | 68 | |
12168 | mquerol | 69 | \text{style_reponse=background-color: #FFCC99;} |
3451 | obado | 70 | |
12168 | mquerol | 71 | :Percentatge d'èxit necessari per passar a la següent etapa (si el nombre màxim d'etapes > 1) |
3451 | obado | 72 | |
3445 | bpr | 73 | \text{percent=0} |
3451 | obado | 74 | |
12168 | mquerol | 75 | :S'accepta text aleatori posat entre claus |
6132 | bpr | 76 | $embraced_randitem |
12168 | mquerol | 77 | \text{accolade=item(2, sí, no)} |
6132 | bpr | 78 | |
12168 | mquerol | 79 | :Mostrar les respostes correctes |
80 | Si poseu sí, les respostes correctes es mostraran una vegada l'alumne respongui les preguntes. |
||
81 | \text{answer_given=item(1, sí, no)} |
||
9980 | obado | 82 | |
12168 | mquerol | 83 | :Pregunta |
84 | <p>Introduïu aquí la pregunta que voleu fer, d'acord amb el següent format:</p> |
||
85 | <ol> |
||
86 | <li>La primera línia conté l'enunciat de la pregunta.</li> |
||
87 | <li> La segona línia representa un feedback, que es mostrarà després de la validació de les respostes |
||
88 | (es pot deixar en blanc).</li> |
||
89 | <li>Introduïu a la tercera línia la llista dels números de les respostes correctes, separats per comes. (Els números representen l'ordre en què s'escriuen les propostes a continuació)</li> |
||
90 | <li>Cada línia següent representa les diferents propostes de resposta.</li></ol> |
||
91 | <div style="border-left:2px solid orange;width:45em;background-color:white;padding:1em .5em;">Exemple: <br/> |
||
92 | <pre>Enunciat de la Pregunta 1 |
||
93 | Explicació (feedback) que s'ha de mostrar en cas de resposta incorrecta a la pregunta |
||
94 | Números que indiquen el lloc de les respostes correctes |
||
95 | Proposta 1 |
||
96 | Proposta 2 |
||
97 | Proposta 3</pre></div> |
||
98 | <p class="oef_indbad"><strong>Atenció :</strong>aquí estan prohibits els punt i coma.</p> |
||
99 | <hr/> |
||
100 | <p><em>Opcional:</em> podeu afegir opcionalment una primera línia que contindrà variables per inserir un títol, una imatge, un so. (nb: ha d'estar en una classe o mòdul per transferir aquests fitxers). En aquest cas, serà la 2a línia (i no la 1a) que representi l'enunciat, la 3a línia el feedback, etc.</p> |
||
101 | Les possibles variables són: |
||
3452 | obado | 102 | <ul> |
12168 | mquerol | 103 | <li><code>Qtitle</code> : mostra un títol al principi de la pregunta. (per exemple, per indicar el tema)</li> |
104 | <li><code>Qimage</code> : si s'especifica un fitxer d'imatge, aquesta es mostrarà al principi de la pregunta (només funciona en un mòdul o classe).</li> |
||
105 | <li><code>Qaudio</code> : si s'indica un fitxer de so, es mostrarà al principi de la pregunta (només funciona en un mòdul o una classe. Bugs coneguts amb Safari).</li> |
||
106 | </ul> |
||
107 | <div style="border-left:2px solid orange;width:45em;background-color:white;padding:1em .5em;">Exemple : <br/> |
||
108 | <pre>Qtitle="Títol de la pregunta 2" Qimage="image.jpg" Qaudio="son.mp3" |
||
109 | Enunciat de la pregunta 2 |
||
110 | Explicació (feedback) que s'ha de mostrar en cas de resposta incorrecta a la pregunta 2 |
||
111 | Número(s) que indiquin el lloc de les respostes correctes |
||
112 | Proposta 1 |
||
113 | Proposta 2 |
||
114 | Proposta 3</pre></div> |
||
115 | \text{data1=asis(En quelle année eut lieu la bataille de Marignan ? |
||
3452 | obado | 116 | Marignan fut la première victoire du jeune roi François Ier, la première année de son règne. |
3445 | bpr | 117 | 1 |
118 | 1515 |
||
119 | 1414 |
||
120 | 1313 |
||
12168 | mquerol | 121 | 1616)} |
3445 | bpr | 122 | |
12168 | mquerol | 123 | :Pregunta 2 |
3451 | obado | 124 | |
12168 | mquerol | 125 | \text{data2=asis(En 2014, quelle est la ville la plus peuplée au monde ? |
126 | C'est Tokyo, la capitale du Japon (37,7 millions d'habitants), loin devant les autres (qui ont entre 20 et 24 millions d'habitants). <p class="right">Source <a href="http://www.populationdata.net/index2.php?option=palmares&rid=4&nom=grandes-villes-du-monde" target="_blank">populationdata.net</a></p> |
||
127 | 7 |
||
128 | Beijing |
||
129 | Karachi |
||
130 | Manille |
||
3451 | obado | 131 | Mexico |
132 | New York |
||
12168 | mquerol | 133 | Shanghaï |
134 | Tokyo)} |
||
3451 | obado | 135 | |
12168 | mquerol | 136 | :Pregunta 3 |
3451 | obado | 137 | |
12168 | mquerol | 138 | \text{data3=asis(Quel est le nom de ce fleuve : <img src="http://upload.wikimedia.org/wikipedia/commons/e/e4/Mekong_River_watershed.png"/> |
3459 | bpr | 139 | Environ 70 millions d'habitants vivent directement dans le bassin versant du Mékong. |
3451 | obado | 140 | 1 |
141 | Le Mékong |
||
142 | Le Yangzi Jiang |
||
143 | La Volga |
||
12168 | mquerol | 144 | Le Danube)} |
3451 | obado | 145 | |
12168 | mquerol | 146 | :Pregunta 4 |
3451 | obado | 147 | |
12168 | mquerol | 148 | \text{data4=asis(Qtitle="En Peinture" |
149 | Parmi ces différents peintres, lesquels font partie du mouvement impressionniste ? |
||
3452 | obado | 150 | Ingres est associé au courant Romantique, et Raphaël à la Renaissance. |
151 | 1,3 |
||
152 | Edgar Degas |
||
153 | Dominique Ingres |
||
154 | Claude Monet |
||
12168 | mquerol | 155 | Raphaël)} |
3451 | obado | 156 | |
12168 | mquerol | 157 | :Pregunta 5 |
3451 | obado | 158 | |
12168 | mquerol | 159 | \text{data5=asis(Qtitle=ANIMAUX |
160 | Quel est le cri du chameau ? |
||
3452 | obado | 161 | Le brairement est le cri de l'âne, le bêlement : celui des moutons et des chèvres. |
3451 | obado | 162 | 1 |
163 | Le blatèrement |
||
164 | Le brairement |
||
12168 | mquerol | 165 | Le bêlement)} |
3451 | obado | 166 | |
12168 | mquerol | 167 | :Pregunta 6 |
3451 | obado | 168 | |
12168 | mquerol | 169 | \text{data6=asis(Qtitle=Chimie |
170 | Quelle est la formule chimique de la testostérone ? |
||
171 | C<sub>8</sub>H<sub>10</sub>N<sub>4</sub>O<sub>2</sub> correspond à la caféine, C<sub>3</sub>H<sub>5</sub>N<sub>3</sub>O<sub>9</sub> à la nitroglycérine, et C<sub>17</sub>H<sub>19</sub>NO<sub>3</sub> la morphine |
||
3451 | obado | 172 | 4 |
173 | C<sub>8</sub>H<sub>10</sub>N<sub>4</sub>O<sub>2</sub> |
||
174 | C<sub>3</sub>H<sub>5</sub>N<sub>3</sub>O<sub>9</sub> |
||
175 | C<sub>17</sub>H<sub>19</sub>NO<sub>3</sub> |
||
12168 | mquerol | 176 | C<sub>19</sub>H<sub>28</sub>O<sub>2</sub>)} |
3451 | obado | 177 | |
12168 | mquerol | 178 | :Pregunta 7 |
3451 | obado | 179 | |
12168 | mquerol | 180 | \text{data7=asis(À partir de quel jour le beaujolais nouveau est-il disponible en vente ? |
3459 | bpr | 181 | Le beaujolais nouveau est un vin de primeur, c'est-à-dire un vin de l'année même, dont la commercialisation est autorisée immédiatement après la fin de la vinification. |
3451 | obado | 182 | 3 |
183 | le premier jeudi de Novembre |
||
184 | le deuxième jeudi de Novembre |
||
185 | le troisième jeudi de Novembre |
||
12168 | mquerol | 186 | le quatrième jeudi de Novembre)} |
3451 | obado | 187 | |
12168 | mquerol | 188 | :Pregunta 8 |
3451 | obado | 189 | |
12168 | mquerol | 190 | \text{data8=asis(Dans le film <i>"Rain Man"</i>, quel acteur a un frère autiste surdoué ? |
3452 | obado | 191 | <i>Rain Man</i> est un film américain réalisé par Barry Levinson, sorti en 1989 en France. |
3451 | obado | 192 | 2 |
193 | Bruce Willis |
||
194 | Tom Cruise |
||
12168 | mquerol | 195 | Woody Allen)} |
3451 | obado | 196 | |
12168 | mquerol | 197 | :Pregunta 9 |
3451 | obado | 198 | |
12168 | mquerol | 199 | \text{data9=asis(Le ski nautique est une discipline olympique depuis 1976. |
3452 | obado | 200 | L'apparition du ski nautique aux jeux olympiques ne date que de 2004. Toutefois, il avait été sport de démonstration en 1972. |
3451 | obado | 201 | 2 |
202 | Vrai |
||
12168 | mquerol | 203 | Faux)} |
3451 | obado | 204 | |
12168 | mquerol | 205 | :Pregunta 10 |
3451 | obado | 206 | |
12168 | mquerol | 207 | \text{data10=asis(Qtitle=Musique |
208 | Quel est le premier ballet écrit par Tchaïkovski ? |
||
3452 | obado | 209 | Le Lac des cygnes a été écrit en 1875 et Casse-noisette en 1891. |
3451 | obado | 210 | 1 |
211 | Le Lac des cygnes |
||
12168 | mquerol | 212 | Casse-noisette)} |
3451 | obado | 213 | |
12168 | mquerol | 214 | :Tipus de respostes |
215 | El tipus "checkbox" (botons quadrats) permet diverses respostes per pregunta. <br/> |
||
216 | Mentre que el tipus "radio" (botons rodons) només permet una resposta per pregunta. |
||
217 | \text{format=item(1, checkbox, radio)} |
||
218 | |||
3459 | bpr | 219 | : |
12168 | mquerol | 220 | \language{ca} |
3445 | bpr | 221 | \computeanswer{no} |
222 | \format{html} |
||
223 | |||
12168 | mquerol | 224 | \text{paste=yes} |
3445 | bpr | 225 | |
226 | \text{option=} |
||
227 | |||
9980 | obado | 228 | :%%%%%%%%%%%%%% Rien à modifier jusqu'à l'énoncé %%%%%%%%%%%%%%%% |
229 | |||
3445 | bpr | 230 | \text{data_q=\data1!= ? 1:} |
231 | \text{data_q=\data2!= ? wims(append item 2 to \data_q)} |
||
232 | \text{data_q=\data3!= ? wims(append item 3 to \data_q)} |
||
233 | \text{data_q=\data4!= ? wims(append item 4 to \data_q)} |
||
234 | \text{data_q=\data5!= ? wims(append item 5 to \data_q)} |
||
235 | \text{data_q=\data6!= ? wims(append item 6 to \data_q)} |
||
236 | \text{data_q=\data7!= ? wims(append item 7 to \data_q)} |
||
237 | \text{data_q=\data8!= ? wims(append item 8 to \data_q)} |
||
238 | \text{data_q=\data9!= ? wims(append item 9 to \data_q)} |
||
3451 | obado | 239 | \text{data_q=\data10!= ? wims(append item 10 to \data_q)} |
3445 | bpr | 240 | |
12168 | mquerol | 241 | \text{instruction=\accolade issametext sí ? wims(embraced randitem \instruction):\instruction} |
3445 | bpr | 242 | |
243 | \integer{cnt_question=items(\data_q)} |
||
244 | |||
245 | \text{nopaste=\paste issametext no ? slib(utilities/nopaste )} |
||
246 | |||
247 | \text{style = <style type="text/css"> |
||
3452 | obado | 248 | .enonce{margin-bottom:0} |
12168 | mquerol | 249 | .qcm_prompt2{margin-top:.5em} |
250 | img{vertical-align:middle;} |
||
251 | .q_num, .panel .wims_title{ |
||
252 | font-size:150%;font-family:Impact, Charcoal, sans-serif; |
||
253 | color:#777; |
||
254 | } |
||
3452 | obado | 255 | .feedback{border:1px dashed grey;padding:0.5em;margin:0;} |
12168 | mquerol | 256 | .reponse { |
257 | margin: 0 1em; |
||
258 | padding: .5em; |
||
259 | border-radius:5px; |
||
260 | \style_reponse |
||
261 | } |
||
262 | .panel{ |
||
263 | padding:.5em 1em .5em 1em; |
||
264 | margin:.5em 0; |
||
265 | border:1px solid #d8d8d8; |
||
266 | border-radius:5px; |
||
267 | background-color: #f2f2f2; |
||
268 | } |
||
269 | .panel.callout{ |
||
270 | border-color:#c5e5f3; |
||
271 | border-width:2px; |
||
272 | \style_question |
||
273 | } |
||
274 | .callout .q_num, .callout .wims_title{color:black;} |
||
9925 | obado | 275 | |
12168 | mquerol | 276 | .panel .wims_title, .panel .wimscenter{margin-top:-1.2em;} |
277 | ol li{margin-bottom: .5em;list-style: upper-alpha;} |
||
278 | input[type='checkbox'] { font-size:150%; } |
||
279 | .strike{text-decoration:line-through;} |
||
280 | .oef_indpartial{color:navy;} |
||
281 | #answeranalysis{display:none;} |
||
3445 | bpr | 282 | </style> |
12168 | mquerol | 283 | } |
3445 | bpr | 284 | |
285 | \integer{N = min(\cnt_question,\N)} |
||
286 | \integer{MAX=min(\N*\MAX,\cnt_question)} |
||
12168 | mquerol | 287 | \text{battage=\alea issametext sí ? shuffle(\data_q,,) :\data_q} |
3445 | bpr | 288 | \text{battage=wims(nonempty items \battage)} |
9925 | obado | 289 | |
3445 | bpr | 290 | \text{option=\option noanalyzeprint} |
291 | \matrix{question=} |
||
12168 | mquerol | 292 | \matrix{explication=xxx} |
3445 | bpr | 293 | \matrix{rep=} |
294 | \text{CNT_choix= } |
||
295 | \matrix{CHOIX=} |
||
296 | \text{PRELIMINAIRE=} |
||
12168 | mquerol | 297 | |
3445 | bpr | 298 | \for{i= 1 to \MAX}{ |
12168 | mquerol | 299 | \matrix{QUEST=\battage[\i]=1? \data1} |
300 | \matrix{QUEST=\battage[\i]=2? \data2} |
||
301 | \matrix{QUEST=\battage[\i]=3? \data3} |
||
302 | \matrix{QUEST=\battage[\i]=4? \data4} |
||
303 | \matrix{QUEST=\battage[\i]=5? \data5} |
||
304 | \matrix{QUEST=\battage[\i]=6? \data6} |
||
305 | \matrix{QUEST=\battage[\i]=7? \data7} |
||
306 | \matrix{QUEST=\battage[\i]=8? \data8} |
||
307 | \matrix{QUEST=\battage[\i]=9? \data9} |
||
308 | \matrix{QUEST=\battage[\i]=10? \data10} |
||
9925 | obado | 309 | |
3445 | bpr | 310 | \text{preliminaire_test=\QUEST} |
311 | \text{preliminaire_test=row(1,\preliminaire_test)} |
||
12168 | mquerol | 312 | \text{inst_audio=wims(getopt Qaudio in \preliminaire_test)} |
313 | \text{inst_image=wims(getopt Qimage in \preliminaire_test)} |
||
314 | \text{inst_title=wims(getopt Qtitle in \preliminaire_test)} |
||
315 | |||
3445 | bpr | 316 | \text{rab_inst=} |
12168 | mquerol | 317 | \text{rab_inst=\inst_title notsametext ?\rab_inst <h2 class="wims_title">\inst_title</h2>} |
318 | \text{rab_inst=\inst_image notsametext ?\rab_inst <div class="wimscenter"><img src="\imagedir/\inst_image" alt="" /></div>} |
||
3445 | bpr | 319 | \if{\inst_audio notsametext }{ |
12168 | mquerol | 320 | \text{rab_inst1= . isin \inst_audio ? |
321 | <audio controls> |
||
322 | <source src="\imagedir/\inst_audio" type="audio/mpeg"> |
||
323 | Désolé, votre navigateur est incompatible avec la lecture de fichiers audio. |
||
324 | </audio>} |
||
325 | \text{rab_inst=\rab_inst <div class="wimscenter audio">\rab_inst1[1;1]</div>} |
||
326 | } |
||
327 | |||
328 | \integer{test_inst=\inst_audio\inst_image\inst_title notsametext ? 1 : 0} |
||
329 | \text{preliminaire=\test_inst=1 ? \rab_inst: } |
||
330 | \matrix{QUEST=\test_inst=1 ? \QUEST[2..-1;]} |
||
331 | \matrix{QUEST=\accolade issametext oui ?wims(embraced randitem \QUEST):\QUEST} |
||
332 | \matrix{question = \question |
||
333 | \QUEST[1;]} |
||
334 | \matrix{PRELIMINAIRE=\PRELIMINAIRE |
||
335 | \preliminaire} |
||
336 | |||
337 | \text{expl=\QUEST[2;]} |
||
338 | \text{ligne=wims(upper \expl)} |
||
339 | \text{ligne=wims(text select ABCDEFGHIJKLMNOPQRSTUVWXYZ in \ligne)} |
||
340 | \if{\ligne issametext and \expl notsametext }{ |
||
341 | \matrix{explication = \explication;} |
||
3445 | bpr | 342 | \integer{debut = 2} |
343 | } |
||
344 | \if{\ligne issametext and \expl issametext }{ |
||
12168 | mquerol | 345 | \matrix{explication = \explication;} |
3445 | bpr | 346 | \integer{debut = 3} |
347 | } |
||
348 | \if{\ligne notsametext}{ |
||
12168 | mquerol | 349 | \matrix{explication = \explication;\expl} |
3445 | bpr | 350 | \integer{debut = 3} |
351 | } |
||
352 | \integer{cnt_choix=rows(\QUEST)-\debut} |
||
353 | \text{CNT_choix=\CNT_choix,\cnt_choix} |
||
354 | \text{Choix=} |
||
355 | \text{mix=shuffle(\cnt_choix)} |
||
356 | \for{ j=\debut+1 to \cnt_choix + \debut+1}{ |
||
357 | \text{choix= \QUEST[\j;]} |
||
358 | \text{choix=wims(replace internal , by , in \choix)} |
||
359 | \matrix{Choix = \Choix, \choix[1;]} |
||
360 | } |
||
361 | \text{Choix=wims(nonempty items \Choix)} |
||
362 | \text{Choix= \Choix[\mix]} |
||
363 | \matrix{CHOIX=\CHOIX |
||
364 | \Choix} |
||
365 | \text{H = wims(nospace \QUEST[\debut;])} |
||
366 | \text{cnt_c=items(\H)} |
||
367 | \text{Rep = } |
||
9925 | obado | 368 | \for{ k = 1 to \cnt_c}{ |
3445 | bpr | 369 | \text{Rep = \Rep, position(\H[\k],\mix)} |
370 | } |
||
371 | \text{Rep = wims(sort items wims(nonempty items \Rep))} |
||
372 | \matrix{rep = \rep |
||
373 | \Rep} |
||
374 | } |
||
375 | |||
376 | \text{CNT_choix=wims(nonempty items \CNT_choix)} |
||
377 | |||
378 | \text{U = pari(divrem(\MAX,\N)~)} |
||
379 | \integer{cnt_step = \U[1] + 1} |
||
380 | \matrix{STEPS = } |
||
381 | \matrix{CNT = } |
||
382 | \text{CONDSTEP=} |
||
383 | \for{ u = 1 to \cnt_step -1}{ |
||
384 | \matrix{STEPS =\STEPS |
||
385 | wims(makelist r x for x = \N*\u -\N+1 to \N*\u)} |
||
386 | \matrix{CNT =\CNT |
||
387 | wims(makelist x for x = \N*\u -\N+1 to \N*\u)} |
||
388 | \text{condstep= wims(values \u+1 for x = (\u-1)*\N +1 to \u*\N)} |
||
389 | \text{CONDSTEP= wims(append item \condstep to \CONDSTEP)} |
||
390 | } |
||
391 | \matrix{STEPS = \STEPS |
||
12168 | mquerol | 392 | wims(makelist r x for x = \N*\cnt_step-\N+1 to \MAX) |
3445 | bpr | 393 | } |
394 | \matrix{CNT = \CNT |
||
12168 | mquerol | 395 | wims(makelist x for x = \N*\cnt_step-\N+1 to \MAX) |
3445 | bpr | 396 | } |
12168 | mquerol | 397 | \text{CONDSTEP=\CONDSTEP, wims(values \cnt_step+1 for x = \N*\cnt_step-\N+1 to \MAX)} |
3445 | bpr | 398 | |
399 | \text{nstep=\STEPS[1;]} |
||
400 | \text{TEST=} |
||
12168 | mquerol | 401 | \text{explication=\explication[2..-1;]} |
402 | |||
3445 | bpr | 403 | text{testexp=wims(rows2lines \explication)} |
404 | text{testexp=wims(lines2items \testexp)} |
||
405 | text{testexp=wims(items2words \testexp)} |
||
406 | text{testexp=wims(nospace \testexp)} |
||
407 | \nextstep{\nstep} |
||
408 | \text{REP=} |
||
409 | \text{etape=wims(values x * \N for x = 1 to \cnt_step+1)} |
||
410 | \text{CONDITION = wims(makelist x for x = 1 to 2*\MAX)} |
||
411 | \text{CONDITION =wims(items2words \CONDITION)} |
||
412 | \conditions{\CONDITION} |
||
413 | \integer{cnt_juste=0} |
||
414 | \real{v = 10} |
||
12168 | mquerol | 415 | |
3445 | bpr | 416 | \statement{\nopaste |
12168 | mquerol | 417 | \style |
418 | <div class="instructions">\instruction</div> |
||
419 | |||
420 | \for{h=1 to \etape[\step]}{ |
||
421 | |||
422 | \if{\question[\h;] notsametext }{ |
||
423 | \if{\h <= \etape[\step] - \N} |
||
424 | {<div class="panel">} |
||
425 | {<div class="panel callout">} |
||
426 | } |
||
427 | |||
3445 | bpr | 428 | \if{(\h <= \etape[\step] - \N or r \h isitemof \nstep) and \question[\h;] notsametext }{ |
6946 | bpr | 429 | <div class="enonce"> |
12168 | mquerol | 430 | \if{\cnt_step > 1 and \MAX > 1}{<span class="q_num">\h :</span>} |
13382 | bpr | 431 | <div class="preliminaire">\PRELIMINAIRE[\h;]</div> |
12168 | mquerol | 432 | <span class="question">\question[\h;]</span> |
433 | </div> |
||
3445 | bpr | 434 | } |
12168 | mquerol | 435 | |
3445 | bpr | 436 | \if{\h <= \etape[\step] - \N and \question[\h;] notsametext}{ |
437 | <div class="reponse"> |
||
12168 | mquerol | 438 | <span class="qcm_prompt1">\qcm_prompt1</span> |
3445 | bpr | 439 | \for{ a in \REP[\h;]}{ |
12168 | mquerol | 440 | \if{ \a isitemof \CHOIX[\h;\rep[\h;]]}{ |
3445 | bpr | 441 | \if{\TEST[\h;2]>0 and \TEST[\h;3]=0}{ |
12168 | mquerol | 442 | <span class="oef_indpartial">\a</span>} |
443 | {<span class="oef_indgood">\a</span>} |
||
3445 | bpr | 444 | } |
445 | { |
||
12168 | mquerol | 446 | <span class="oef_indbad strike">\a</span>} - } |
447 | \if{\TEST[\h;2]>0 and \TEST[\h;3]=0} |
||
448 | {<span class="oef_indpartial">\incomplete_answer_text</span>} |
||
449 | \if{\TEST[\h;3]>0} |
||
450 | {<span class="oef_indbad">\bad_answer_text</span>} |
||
451 | \if{\TEST[\h;3]=0 and \TEST[\h;2]=0} |
||
452 | {<span class="oef_indgood">\good_answer_text</span>} |
||
453 | \if{\answer_given issametext sí}{ |
||
454 | <p class="qcm_prompt2"> \qcm_prompt2</p> |
||
455 | <ul class="oef_indgood"> |
||
4576 | obado | 456 | \for{s=1 to \CNT_choix[\h]}{ |
9925 | obado | 457 | \if{\s isitemof \rep[\h;]}{ <li>\CHOIX[\h;\s]</li>} |
12168 | mquerol | 458 | } |
459 | </ul> |
||
4576 | obado | 460 | } |
12168 | mquerol | 461 | \if{\explication[\h;] notsametext }{<div class="feedback">\explication[\h;]</div>} |
3445 | bpr | 462 | </div> |
463 | } |
||
464 | { \if{ r \h isitemof \nstep}{ |
||
465 | <div class="question"> |
||
9925 | obado | 466 | <ol> |
467 | \for{s=1 to \CNT_choix[\h]}{ <li>\embed{reply \h , \s}</li> } |
||
468 | </ol> |
||
3445 | bpr | 469 | </div> |
470 | } |
||
471 | } |
||
12168 | mquerol | 472 | |
473 | \if{\question[\h;] notsametext }{</div>} |
||
3445 | bpr | 474 | } |
475 | } |
||
476 | \answer{}{\REP1;\CHOIX[1;]}{type=\format}{option=\option} |
||
477 | \answer{}{\REP2;\CHOIX[2;]}{type=\format}{option=\option} |
||
478 | \answer{}{\REP3;\CHOIX[3;]}{type=\format}{option=\option} |
||
479 | \answer{}{\REP4;\CHOIX[4;]}{type=\format}{option=\option} |
||
480 | \answer{}{\REP5;\CHOIX[5;]}{type=\format}{option=\option} |
||
481 | \answer{}{\REP6;\CHOIX[6;]}{type=\format}{option=\option} |
||
482 | \answer{}{\REP7;\CHOIX[7;]}{type=\format}{option=\option} |
||
483 | \answer{}{\REP8;\CHOIX[8;]}{type=\format}{option=\option} |
||
484 | \answer{}{\REP9;\CHOIX[9;]}{type=\format}{option=\option} |
||
485 | \answer{}{\REP10;\CHOIX[10;]}{type=\format}{option=\option} |
||
486 | |||
487 | \matrix{REP = \REP1 |
||
488 | \REP2 |
||
489 | \REP3 |
||
490 | \REP4 |
||
491 | \REP5 |
||
492 | \REP6 |
||
493 | \REP7 |
||
494 | \REP8 |
||
495 | \REP9 |
||
496 | \REP10} |
||
497 | \if{\format=radio}{ |
||
12168 | mquerol | 498 | \text{REP=wims(replace internal , by , in \REP)} |
3445 | bpr | 499 | } |
500 | \matrix{explication2 = \explication2} |
||
501 | |||
502 | \for{u = 1 to \N}{ |
||
503 | \text{H = \CNT[\step-1;\u]} |
||
504 | \text{test1 = wims(listuniq \REP[\H;],\CHOIX[\H;\rep[\H;]])} |
||
505 | \integer{test1 = items(\test1)-items(\CHOIX[\H;\rep[\H;]])} |
||
506 | \text{test2 = wims(listcomplement \REP[\H;] in \CHOIX[\H;\rep[\H;]])} |
||
507 | \text{test3 = wims(listcomplement \CHOIX[\H;\rep[\H;]] in \REP[\H;])} |
||
508 | %%% \integer{test4=items(\REP[\H;]) - items(\CHOIX[\H;])} |
||
9925 | obado | 509 | \text{test_cnt=\test1, items(\test2),items(\test3)} |
3445 | bpr | 510 | \integer{cnt_juste= \test_cnt[1]+\test_cnt[2]+\test_cnt[3] =0 ? \cnt_juste + 1} |
511 | \matrix{TEST=\TEST |
||
512 | \test_cnt} |
||
513 | } |
||
514 | |||
515 | test1 = 0 rep < juste |
||
12168 | mquerol | 516 | test2 nombre de réponses dites justes et en fait fausses |
517 | test3 nombre de réponses dites fausses et en fait justes |
||
3445 | bpr | 518 | |
519 | totalement justes : test1=0, test2=0 test3=0 |
||
9925 | obado | 520 | partiellement justes : |
3445 | bpr | 521 | |
522 | \real{v=\cnt_juste/\CNT[\step-1;\N]} |
||
523 | |||
524 | \text{nstep = \v >= \percent ? \STEPS[\step;]:} |
||
525 | |||
526 | \condition{Question 1 : \REP1}{\TEST[1;3]=0}{option=hide} |
||
527 | \condition{Question 1 : \REP1}{\TEST[1;1]=0 and \TEST[1;2]=0 and \TEST[1;3]=0}{option=hide} |
||
528 | \condition{Question 2 : \REP2}{\TEST[2;3]=0 and \step >=\CONDSTEP[2]}{option=hide} |
||
529 | \condition{Question 2 : \REP2}{\TEST[2;1]=0 and \TEST[2;2]=0 and \TEST[2;3]=0 and \step >=\CONDSTEP[2]}{option=hide} |
||
530 | \condition{Question 3 : \REP3}{\TEST[3;3]=0 and \step >=\CONDSTEP[3]}{option=hide} |
||
531 | \condition{Question 3 : \REP3}{\TEST[3;1]=0 and \TEST[3;2]=0 and \TEST[3;3]=0 and \step >=\CONDSTEP[3]}{option=hide} |
||
532 | \condition{Question 4 : \REP4}{\TEST[4;3]=0 and \step >=\CONDSTEP[4]}{option=hide} |
||
533 | \condition{Question 4 : \REP4}{\TEST[4;1]=0 and \TEST[4;2]=0 and \TEST[4;3]=0 and \step >=\CONDSTEP[4]}{option=hide} |
||
534 | \condition{Question 5 : \REP5}{\TEST[5;3]=0 and \step >=\CONDSTEP[5]}{option=hide} |
||
535 | \condition{Question 5 : \REP5}{\TEST[5;1]=0 and \TEST[5;2]=0 and \TEST[5;3]=0 and \step >=\CONDSTEP[5]}{option=hide} |
||
536 | \condition{Question 6 : \REP6}{\TEST[6;3]=0 and \step >=\CONDSTEP[6]}{option=hide} |
||
537 | \condition{Question 6 : \REP6}{\TEST[6;1]=0 and \TEST[6;2]=0 and \TEST[6;3]=0 and \step >=\CONDSTEP[6]}{option=hide} |
||
538 | \condition{Question 7 : \REP7}{\TEST[7;3]=0 and \step >=\CONDSTEP[7]}{option=hide} |
||
539 | \condition{Question 7 : \REP7}{\TEST[7;1]=0 and \TEST[7;2]=0 and \TEST[7;3]=0 and \step >=\CONDSTEP[7]}{option=hide} |
||
540 | \condition{Question 8 : \REP8}{\TEST[8;3]=0 and \step >=\CONDSTEP[8]}{option=hide} |
||
541 | \condition{Question 8 : \REP8}{\TEST[8;1]=0 and \TEST[8;2]=0 and \TEST[8;3]=0 and \step >=\CONDSTEP[8]}{option=hide} |
||
542 | \condition{Question 9 : \REP9}{\TEST[9;3]=0 and \step >=\CONDSTEP[9]}{option=hide} |
||
543 | \condition{Question 9 : \REP9}{\TEST[9;1]=0 and \TEST[9;2]=0 and \TEST[9;3]=0 and \step >=\CONDSTEP[9]}{option=hide} |
||
544 | \condition{Question 10 : \REP10}{\TEST[10;3]=0 and \step >=\CONDSTEP[10]}{option=hide} |
||
545 | \condition{Question 10 : \REP10}{\TEST[10;1]=0 and \TEST[10;2]=0 and \TEST[10;3]=0 and \step >=\CONDSTEP[10]}{option=hide} |
||
546 | |||
547 | |||
548 | |||
549 | \text{test=wims(rows2lines \explication)} |
||
550 | \text{test=wims(lines2items \test)} |
||
551 | \text{test=wims(items2words \test)} |
||
552 | \text{test=wims(nospace \test)} |
||
9925 | obado | 553 | feedback{1=1}{\explication |
3445 | bpr | 554 | \if{\test notsametext}{ |
555 | <div class="reponse"><ol> |
||
556 | \for{w = 1 to \MAX}{ |
||
557 | \if{\explication[\w;] notsametext } |
||
7097 | bpr | 558 | {<li style="list-style:decimal;" value="\w">\explication[\w;] </li>} |
3445 | bpr | 559 | } |
560 | </ol> |
||
561 | </div> |
||
562 | } |
||
563 | } |
||
564 | {<ol> |
||
565 | \for{ t = 1 to \N}{ |
||
566 | \if{\CNT[\step;\t] != }{ |
||
7097 | bpr | 567 | <li style="list-style:decimal;" value="\CNT[\step;\t]"> <b>\question[\N*(\step-1) + \t;]</b> |
3445 | bpr | 568 | <div class="question"><ol> |
569 | \for{s=1 to \CNT_choix[\N*(\step-1) + \t]}{ |
||
570 | <li>\embed{\STEPS[\step;\t] , \s }</li> |
||
571 | } |
||
572 | </ol> |
||
573 | </div> |
||
574 | </li>} |
||
575 | } |
||
576 | </ol> |
||
13382 | bpr | 577 | } |