!set title=Punto en una 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=12
prevarcnt=11
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 1, 20

tmp1=!randitem -1,1

val8=$[rint($(tmp0)*$(tmp1))]
tmp0=!randint 1, 20

tmp1=!randitem -1,1

val9=$[rint($(tmp0)*$(tmp1))]
tmp0=!randint -20, 20

val10=$[rint($(tmp0))]
val11=!rawmath $val6*t + $val8
val12=!rawmath $val7*t + $val9
tmp0=!randitem 1,2

val13=$[rint($(tmp0))]
tmp0=!item $val13 of $val10,c

val14=$(tmp0)
tmp0=!item $val13 of c,$val10

val15=$(tmp0)
tmp0=!item $val13 of 	               $val9+($val7)*($val10-($val8))/($val6),	               $val8+($val6)*($val10-($val9))/($val7)	               

val16=$[$(tmp0)]
replyname1=\(c)
replygood1=$val16
question=__EXECUTED_1692754_EXERCISE__

!goto stat

!exit

:question
$()Sea 
!insmath L
$() la recta definida por las ecuaciones paramétricas    <p><center>	    
!insmath x=$val11
$(),	    
!insmath y=$val12
$().	    </center> <p>	    Hallr el valor de 
!insmath c
$() tal que el punto	    
!insmath ($val14,$val15)
$() esté en 
!insmath L
$().	
$()
!exit

:hint
$()
$()
!exit

:help
$()
$()
!exit

:solution
$()
$()
!exit

:feedback

!exit

:test

!exit

:stat
vsavelist=11,12,14,15
embedcnt=0
