!set title=Área del pentágono
!if $wims_read_parm!=$empty
 !goto $wims_read_parm
!endif
oef2wims_version=3.22
language=en
leftrange=-5.000000
rightrange=5.000000
author=Gang XIAO
email=xiao@unice.fr
computeanswer=no
precision=10000

ansorder=r
varcnt=30
prevarcnt=29
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(6)]
val7=$[rint(13)]
tmp0=!randint $val7-2, $val7+4

val8=$[rint($(tmp0))]
tmp0=!randint -2, 2

val9=$[rint($(tmp0))]
tmp0=!randint $val6, $val7

val10=$[rint($(tmp0))]
tmp0=!randint $val6+3, $val7+3

val11=$[rint($(tmp0))]
tmp0=!randint -$val6, -$val7

val12=$[rint($(tmp0))]
tmp0=!randint $val6, $val7

val13=$[rint($(tmp0))]
tmp0=!randint -$val6, -$val7

val14=$[rint($(tmp0))]
tmp0=!randint -$val6, -$val7

val15=$[rint($(tmp0))]
tmp0=!randint $val6, $val7

val16=$[rint($(tmp0))]
tmp0=!randint -$val6-3, -$val7-3

val17=$[rint($(tmp0))]
val18=$[rint($val10-$val8)]
val19=$[rint($val11-$val9)]
val20=$[rint($val12-$val8)]
val21=$[rint($val13-$val9)]
val22=$[rint($val14-$val8)]
val23=$[rint($val15-$val9)]
val24=$[rint($val16-$val8)]
val25=$[rint($val17-$val9)]
val26=$[rint($val18*$val21-$val20*$val19)]
val27=$[rint($val20*$val23-$val22*$val21)]
val28=$[rint($val22*$val25-$val24*$val23)]
val29=$[0.5*abs($val26+$val27+$val28)]
tmp0=!randitem 0,1

val30=$[rint($(tmp0))]

!ifval $val30=1
val31=$val10,$val11
!else
val31=$val16,$val17
!endif

!ifval $val30=1
val32=$val16,$val17
!else
val32=$val10,$val11
!endif

!ifval $val30=1
val33=$val12,$val13
!else
val33=$val14,$val15
!endif

!ifval $val30=1
val34=$val14,$val15
!else
val34=$val12,$val13
!endif
replyname1=Área
replygood1=$val29
question=__EXECUTED_1692754_EXERCISE__

!goto stat

!exit

:question
$()Hallar el área del pentágono <i>ABCDE</i> en el plano cartesiano, cuyos 5 vértices son	<p><center>	 <i>A</i> = ($val8,$val9) , <i>B</i> = ($val31) ,	 <i>C</i> = ($val33) , <i>D</i> = ($val34) , <i>E</i> = ($val32) .	</center> <p>	
$()
!exit

:hint
$()
$()
!exit

:help
$()
$()
!exit

:solution
$()
$()
!exit

:feedback

!exit

:test

!exit

:stat
vsavelist=8,9,31,32,33,34
embedcnt=0
