!set title=Ordenar números relativos II
!if $wims_read_parm!=$empty
 !goto $wims_read_parm
!endif
oef2wims_version=3.22
language=es
leftrange=-5.000000
rightrange=5.000000
author=Bernadette PERRIN-RIOU
email=bpr@math.u-psud.fr
computeanswer=no
precision=10000

ansorder=r
varcnt=23
prevarcnt=22
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

val6=$[rint(3)]
val7=$[rint(3)]
val8=0
val9=
!for val10 =-$val6 to $val7 
val8=$[rint($val10)]
val11=$[rint($val10)]
val9=$val9	text  black, $val11,-1,  medium,$val8
!next
tmp0=!randint 0, 10*$val6-1

val12=$[-$(tmp0)/10]
tmp0=!randint 0, 10*$val6-1

val13=$[$(tmp0)/10]
tmp0=!randint 10, 10*$val6-1

val14=$[-$(tmp0)/10]
tmp0=!randitem 1,-1

tmp1=!randint 10, 10*$val6-1

val15=$[$(tmp0)*$(tmp1)/10]
tmp0=!randint 10, 10*$val6-1

val16=$[-$(tmp0)/10]
tmp0=!randint 10, 10*$val6-1

val17=$[-$(tmp0)/10]
tmp0=!listuniq $val12,$val13,$val14,$val16,$val15,$val17

val18=$(tmp0)
tmp0=!randitem 1,2

val19=$(tmp0)
tmp0=!item $val19 of creciente,decreciente

val20=$(tmp0)
tmp0=!sort numeric  list $val18

val21=$(tmp0)
tmp0=!shuffle $val18

val22=$(tmp0)
tmp0=!replace , by ,&nbsp; &nbsp; in $val22

val22=$(tmp0)
tmp0=!sort reverse numeric  list $val21

val23=$(tmp0)

!ifval $val19=1
val24= $val21
!else
val24=$val23
!endif
replytype1=vector
replyname1=
replygood1=$val24
question=__EXECUTED_1692754_EXERCISE__

!goto stat

!exit

:question
$()Ayudándose de la regla graduada, ordenar en sentido $val20 los siguientes números	<center> $val22 </center>		<center> 
!read oef/draw.phtml 600,50 \
xrange -$val6-0.1,3	yrange -2,2	hline black,0,0	arrow  2.5,0,3,0,10,black	parallel  -$val6,-0.8,-$val6,0.4,1/2,0, 40, blue	parallel  -$val6,-0.3,-$val6,0.3,1/10,0, 200, blue	parallel  -$val6,-0.8,-$val6,0.6,1,0, 40, red	$val9	 
$()	</center>	
$()
!exit

:hint
$()
$()
!exit

:help
$()
$()
!exit

:solution
$()
$()
!exit

:feedback

!exit

:test

!exit

:stat
vsavelist=6,9,20,22
embedcnt=0
