!set title=Distancia de punto a recta II
!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=1000

ansorder=r
varcnt=14
prevarcnt=13
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

tmp0=!randint 2, 20

tmp1=!randitem -1,1

val6=$[rint($(tmp0)*$(tmp1))]
tmp0=!randint 2, 20

tmp1=!randitem -1,1

val7=$[rint($(tmp0)*$(tmp1))]
tmp0=!randint -10, 10

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

val9=$[rint($(tmp0)*2+1)]
val10=$[rint(-($val7))]
val11=$[rint($val6)]
val12=$[rint($val10*($val8)+($val11)*($val9))]
tmp0=!randint -20, 20

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

val14=$[rint($(tmp0))]
val15=$[rint($val10*($val13) + ($val11)*($val14))]
val16=$val6*t + $val8
val17=$val7*t + $val9
val18=$[abs(($val15-($val12))/sqrt(($val10)^2+($val11)^2))]
replyname1=La distancia
replygood1=$val18
question=__EXECUTED_1692754_EXERCISE__

!goto stat

!exit

:question
$()Sea 
!insmath L
$() la recta del plano definida por las ecuaciones paramétricas:	<p><center>	
!insmath x = $val16
$() ,	
!insmath y = $val17
$() .	</center> <p>	Calcular la distancia entre la recta 
!insmath L
$() y el punto	
!insmath ($val13 , $val14) 
$() &nbsp;.	
$()
!exit

:hint
$()
$()
!exit

:help
$()
$()
!exit

:solution
$()
$()
!exit

:feedback

!exit

:test

!exit

:stat
vsavelist=13,14,16,17
embedcnt=0
