!set title=Calculer un quotient.
!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,r
varcnt=26
prevarcnt=25
postvarcnt=0
replycnt=2
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=!randitem 2,3,5,6,7,10,11

val6=$[rint($(tmp0))]
tmp0=!randitem 2,3,5,6,7,10,11

val7=$[rint($(tmp0))]
val8=$[rint($val6*$val7^2)]
tmp0=!randitem 2,3,5

val9=$[rint($(tmp0))]
val10=$[rint(gcd($val9,$val7))]

!ifval $val10<>1
val9=$[rint(13)]
!endif
val11=$[rint($val6*$val9)]
val12=$[rint($val8*$val9)]
val13=$[rint($val6*$val7)]
val14=$[rint($val7*$val9)]
val15=$[rint($val7^2)]
tmp=!trim \frac{\sqrt{$val8}}{\sqrt{$val6}},$val7	$val9\frac{\sqrt{$val8}}{\sqrt{$val6}},$val14	\frac{$val9\sqrt{$val8}}{\sqrt{$val6}},$val14	\sqrt{\frac{1}{$val15}},1/$val7	$val9\sqrt{\frac{1}{$val15}},$val9/$val7	\frac{\sqrt{$val6}}{\sqrt{$val8}},1/$val7	\frac{\sqrt{$val6}}{$val9\sqrt{$val8}},1/$val14	$val9\frac{\sqrt{$val6}}{\sqrt{$val8}},$val9/$val7	\frac{$val9\sqrt{$val6}}{\sqrt{$val8}},$val9/$val7	\frac{\sqrt{$val12}}{\sqrt{$val6}},$val7*sqrt($val9)	\sqrt{\frac{$val9}{$val15}},sqrt($val9)/$val7	\frac{\sqrt{$val11}}{\sqrt{$val8}},sqrt($val9)/$val7
val16=!translate internal $	\
$ to ;; in $tmp
tmp=!translate internal $	$ to ; in $val16

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

val18=$(tmp0)
tmp0=!item 2 of $val17

tmp=!translate ";': to $     $ in $(tmp0)

tmp=!lower $tmp
tmp1=!exec maxima fullratsimp($tmp);
val19=$(tmp1)
tmp0=!randint 1, 3

val20=$[rint($(tmp0))]
val21=$[rint($val19*10^($val20))]
val21=$[$val21/10^($val20)]
val21=$val21
val22=dixième,centième,millième
tmp0=!item $val20 of $val22

val23=$(tmp0)
val23=au $val23
val24=$[10^(-$val20)]
val24=à \($val24)
tmp0=!randitem $val23,$val24

val25=$(tmp0)
replytype1=algexp
replyname1=Ecriture simplifiée
replygood1=$val19
replytype2=litexp
replyname2=Valeur approchée
replygood2=$val21
question=__EXECUTED_1692754_EXERCISE__

!goto stat

!exit

:question
$()Simplifier puis calculer la valeur approchée $val25 près du nombre 
!insmath $val18
$().<br>	(vous devez taper sqrt(2) pour 
!insmath \sqrt{2}
$() )
$()
!exit

:hint
$()
$()
!exit

:help
$()
$()
!exit

:solution
$()
$()
!exit

:feedback

!exit

:test

!exit

:stat
vsavelist=18,25
embedcnt=0
