!set title=Unités du système SI (nocase)
!if $wims_read_parm!=$empty
 !goto $wims_read_parm
!endif
oef2wims_version=3.22

ansorder=r
varcnt=5
prevarcnt=4
postvarcnt=0
replycnt=1
choicecnt=0
conditioncnt=0
feedbackcnt=0
format=html

val1=$imagedir
val2=$confparm1
val3=$confparm2
val4=$confparm3
val5=$confparm4

!if $testcondition=yes
 !goto test
!endif
!if $status=waiting
 !exit
!endif

tmp=!trim une longueur,le mètre	  une masse, kilogramme,le	  une quantité de matière,mole,la,une 	  un temps, seconde,un	  une intensité de courant électrique,ampère,l',un	  une température,kelvin,le, un 	  une intensité lumineuse,candela,le,un	  un angle plan,radian,le,un	  un angle solide,stéradian,le,un
val6=!translate internal $	\
$ to ;; in $tmp
tmp=!translate internal $	$ to ; in $val6

tmp=!nonempty rows $tmp
tmp=!randrow $tmp
tmp0=!translate internal $\
$ to ; in $tmp
tmp=!trim $(tmp0)
val7=!translate internal $	\
$ to ;; in $tmp
tmp0=!positionof item $(val7[;2]) in $(val6[;2])

val8=$[rint($(tmp0))]
val9=$(val6[$val8;3]) $(val6[$val8;2]) | $(val6[$val8;2]) 	      | $(val6[$val8;4]) $(val6[$val8;2])
replytype1=nocase
replyname1=
replygood1=$val9
question=__EXECUTED_1692754_EXERCISE__

!goto stat

!exit

:question
$()Quelle est l'unité pour  $(val7[;1]) ? 	<center> 
!read oef/embed.phtml reply1 
$()</center></p>	
$()
!exit

:hint
$()
$()
!exit

:help
$()
$()
!exit

:solution
$()
$()
!exit

:feedback

!exit

:test

!exit

:stat
vsavelist=7
embedcnt=1
