!set title=Correspondance de racines carrées 3.
!if $wims_read_parm!=$empty
 !goto $wims_read_parm
!endif
oef2wims_version=3.22
language=fr
author=Guerimand Fabrice
email=fwguerima@free.fr
computeanswer=no
precision=10000

ansorder=r
varcnt=29
prevarcnt=28
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=50x75x75
val7=$[rint(3)]
val8=
val9=
!for val10 =1 to $val7 
tmp0=!randitem 2,3,5,7

val11=$[rint($(tmp0))]
tmp0=!randitem 2,3,5,6

val12=$[rint($(tmp0))]
tmp0=!randint 7, 15

val13=$[rint($(tmp0))]
val14=$[rint($val11^2)]
val15=$[rint($val11^3)]
val16=$[rint($val11^4)]
val17=$[rint($val11*$val12)]
val18=$[rint($val14*$val12)]
val19=$[rint($val15*$val12)]
val20=$[rint($val16*$val12)]
val21=$[rint($val11*$val13)]
val22=$[rint($val11^2*$val13)]
val23=\sqrt{$val18};$val11\sqrt{$val12},$val13\sqrt{$val18};$val21\sqrt{$val12},\sqrt{$val15};$val11\sqrt{$val11},\sqrt{$val19};$val11\sqrt{$val17},$val13\sqrt{$val15};$val21\sqrt{$val11},$val13\sqrt{$val19};$val21\sqrt{$val17}
tmp=!nonempty items $val23

tmp0=!randitem $tmp
val24=$(tmp0)
tmp0=!replace internal ; by , in $val24

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

val25=$(tmp0)
val8=$val8,\($val25)
tmp0=!item 2 of $val24

val25=$(tmp0)
val9=$val9,\($val25)
!next
tmp0=!nonempty item $val8

val8=$(tmp0)
tmp0=!nonempty item $val9

val9=$(tmp0)
tmp0=!listuniq $val8

val8=$(tmp0)
tmp0=!listuniq $val9

val9=$(tmp0)
replytype1=correspond
replyname1=La correspondance
replygood1=$val8;$val9
question=__EXECUTED_1692754_EXERCISE__

!goto stat

!exit

:question
$()Mettez en relation les nombres égaux.	<p><center>	 
!read oef/embed.phtml reply 1,$val6 
$()	</center>	
$()
!exit

:hint
$()
$()
!exit

:help
$()
$()
!exit

:solution
$()
$()
!exit

:feedback

!exit

:test

!exit

:stat
vsavelist=6
embedcnt=1
