!set title=Reconocimiento de tipos
!if $wims_read_parm!=$empty
 !goto $wims_read_parm
!endif
oef2wims_version=3.22
language=es
leftrange=-5.000000
rightrange=5.000000
author=Gang XIAO
email=xiao@unice.fr
computeanswer=no
precision=10000

ansorder=c
varcnt=17
prevarcnt=16
postvarcnt=0
replycnt=0
choicecnt=1
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

tmp0=!randint 1, 4

val6=$[rint($(tmp0))]
val7=Es un triángulo rectángulo
val8=Es un triángulo agudo
val9=Es un triángulo obtuso
val10=No es un triángulo
tmp0=!item $val6 of $val7,$val8,$val9,$val10

val11=$(tmp0)
tmp=!trim 3,4,5	6,8,10	9,12,15	12,16,20	15,20,25	5,12,13	10,24,26	7,24,25	
val12=!translate internal $	\
$ to ;; in $tmp
tmp=!translate internal $	$ to ; in $val12

tmp=!nonempty rows $tmp
tmp=!randrow $tmp
tmp0=!translate internal $\
$ to ; in $tmp
val12=$(tmp0)
tmp0=!item 1 of $val12

tmp1=!randint 5, 15

tmp2=!randint 4, 13

tmp3=!randint 3, 10

tmp4=!item $val6 of $(tmp0),$(tmp1),$(tmp2),	 $(tmp3)

val13=$[rint($(tmp4))]
tmp0=!item 2 of $val12

tmp1=!randint 5, 15

tmp2=!randint 4, 13

tmp3=!randint 3, 10

tmp4=!item $val6 of $(tmp0),$(tmp1),$(tmp2),	 $(tmp3)

val14=$[rint($(tmp4))]
tmp0=!item 3 of $val12

tmp1=!randint max($val13,$val14), ceil(sqrt($val13^2+$val14^2))-1

tmp2=!randint floor(sqrt($val13^2+$val14^2))+1, $val13+$val14-1

tmp3=!randint $val13+$val14+1, $val13+$val14+6

tmp4=!item $val6 of $(tmp0),	 $(tmp1),	 $(tmp2),	 $(tmp3)

val15=$[rint($(tmp4))]
tmp0=!shuffle $val13,$val14,$val15

val16=$(tmp0)
tmp0=!item 1 of $val16

val17=$[rint($(tmp0))]
tmp0=!item 2 of $val16

val18=$[rint($(tmp0))]
tmp0=!item 3 of $val16

val19=$[rint($(tmp0))]
val20=$val7,$val8,$val9,$val10
choicename1=El triángulo:
choicegood1=$val11
choicebad1=$val20
question=__EXECUTED_1692754_EXERCISE__

!goto stat

!exit

:question
$()¿De qué clase es un ``triángulo'' ABC con los 3 lados	<p><center>	 AB = $val17 , BC = $val18, CA = $val19 ?	</center>
$()
!exit

:hint
$()
$()
!exit

:help
$()
$()
!exit

:solution
$()
$()
!exit

:feedback

!exit

:test

!exit

:stat
vsavelist=17,18,19
embedcnt=0
