Subversion Repositories wimsdev

Rev

Rev 5448 | Rev 11375 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
4096 bpr 1
type=datalist
2
textarea="data"
3
 
4
:Cacher certains mots d'une phrase (type flashcard).
5
 
6
Des étiquettes sont présentées. Il s'agit d'en cacher certaines.
7
<p>
8
Auteur du modèle : Bernadette Perrin-Riou <bpr@math.u-psud.fr>
9
</p>
10
:%%%%%%%%%%%%%%%%%      ATTENTION      %%%%%%%%%%%%%%%%%%%%
11
 
12
Enlevez l'en-tête ci-dessus si vous détruisez les balises pour le modèle !
13
(Ce sont les lignes qui commencent par un ':'.)
14
Sinon l'exercice risque de ne pas pouvoir repasser sous Createxo.
15
 
16
:%%%%%%%% Paramètres d'exemples à redéfinir %%%%%%%%%%%%%%%%%
17
:\title{Cacher des étiquettes}
5147 bpr 18
:\author{Bernadette, Perrin-Riou}
6132 bpr 19
:\email{bpr@math.u-psud.fr}
20
:\credits{}
4096 bpr 21
:Consigne
22
\text{instruction=Cacher les adjectifs en cliquant sur leur étiquette.}
23
:Nombre de questions proposées (maximum 5)
24
\text{N=2}
25
:Nom du fichier
26
Ne remplissez que si vous vous désirez transférer le source de cet exercice dans un compte Modtool 
27
et utiliser un fichier de données (dans un module OEF)
28
du type
29
<pre>
4674 bpr 30
 &#58;Le chat ??noir?? a&nbsp;mangé la souris ??blanche.??
31
 &#58;Le chat ??blanc?? a mangé la souris ??noire.??
4096 bpr 32
</pre>
33
Dans ce cas, les données principales ne seront pas prises en compte. 
34
Sinon, remplissez les données principales.
35
 
36
\text{file=}
37
 
38
:Données principales.
39
Mettre les phrases en entourant par ?? les mots à cacher.
40
\text{data=Le&nbsp;chat ??noir?? a&nbsp;mangé la souris ??blanche.??
41
La maison ??verte?? est sur la colline.
42
Dans le jardin, il y a des fleurs ??blanches?? et ??rouges?? }
43
 
6132 bpr 44
:Mise en aléatoire par des accolades emboitables
45
$embraced_randitem
46
\text{accolade=item(1,1 oui,
47
2 non)}
48
 
4096 bpr 49
:%%%%%%%%%%%%%% Rien à modifier avant l'énoncé %%%%%%%%%%%%%%%%
6132 bpr 50
\text{accolade=wims(word 1 of \accolade)}
51
 
4096 bpr 52
\integer{N=min(\N,5)}
53
\if{\file notsametext}{
54
  \integer{datacnt=wims(recordcnt \file)}
55
  \integer{N=min(\N,\datacnt)}
56
  \text{choix=shuffle(\datacnt)}
57
  \text{choix=\choix[1..\N]}
58
  \text{data=}
59
  \for{s in \choix}{
60
    \text{data=\data
61
wims(record \s of \file)}
62
   }
63
  }{
64
  \integer{M=rows(\data)}
65
  \integer{N=min(\N,\M)}
66
  \integer{N=min(\N,10)}
67
  \text{liste=shuffle(\M)}
68
  \text{liste=\liste[1..\N]}
69
  \matrix{data=\data}
70
  \matrix{data=\data[\liste;]}
71
}
72
\text{Numero=}
73
\text{Texte=}
74
\text{cnt=}
6132 bpr 75
\text{data=\accolade=1 ?wims(embraced randitem \data)}
4240 bpr 76
\text{data=wims(replace internal ' by &#146; in \data)}
4096 bpr 77
\for{u=1 to \N}{
78
  \matrix{texte=slib(text/markgroup \data[\u;])}
79
  \matrix{numero=\texte[1..-4;]}
80
  \text{cnt_mot = rows(\numero)}
81
  \text{numero = wims(rows2lines \numero)}
82
  \text{numero = wims(lines2items \numero)}
83
  \text{Numero = wims(append line \numero to \Numero)}
84
  \text{texte = \texte[-3;]}
85
  \text{cc=items(\texte)}
86
  \text{cnt = wims(append item  \cc to \cnt)}
87
  \text{Texte=wims(append line \texte to \Texte)}
88
}
89
\matrix{Texte=\Texte}
90
\matrix{Numero=\Numero}
91
\text{STEP=wims(makelist r x for x=1 to \N)}
92
\steps{\STEP}
93
\statement{\instruction
94
\if{\N=1}{<div class="emptyline"> </div>
6132 bpr 95
<div class="wimscenter">\for{j=1 to \cnt}{ 
4096 bpr 96
   \embed{r 1,\j}
6132 bpr 97
 }</div>
4096 bpr 98
}{
99
 \for{ss=1 to \N}{<p> \ss : </p>
6132 bpr 100
 <div class="wimscenter">\for{j=1 to \cnt[\ss]}{
4096 bpr 101
   \embed{r \ss,\j}
6132 bpr 102
 }</div>
4096 bpr 103
 }
104
}
105
}
106
\answer{1}{\Numero[1;];\Texte[1;];&nbsp;}{type=flashcard}{option=show noanalyzeprint}
107
\answer{2}{\Numero[2;];\Texte[2;];&nbsp;}{type=flashcard}{option=show noanalyzeprint}
108
\answer{3}{\Numero[3;];\Texte[3;];&nbsp;}{type=flashcard}{option=show noanalyzeprint}
109
\answer{4}{\Numero[4;];\Texte[4;];&nbsp;}{type=flashcard}{option=show noanalyzeprint}
110
\answer{5}{\Numero[5;];\Texte[5;];&nbsp;}{type=flashcard}{option=show noanalyzeprint}
111