checkfile=$checkdir/number.proc
arglist=x
# answer must be 'x=123'
image=0
math=0
rows=5
cols=18
questiontype=0
!set n=$counter
!if $level =0
    R=$counter
!else
    R=$level
!endif        
#rounding=0
#!readproc $remarkdir/rounding.$taal
question$n=!record 143 of lang/remarks.$taal
#@ Los op:<br><small><em>bereken dus de waarde van x</em></small>
mytexsize=+4

extratext=Gebruik bij het invoeren van je antwoord liever meer dan minder haakjes<br>Denk aan bijvoorbeeld:<table cellpadding=10><th>1/(x+1)</th><th>$m_rightarrow</th><th><img src=$module_dir/gifs/exo32a.gif></th><tr><th>2^(1+x)</th><th>$m_rightarrow</th><th><img src=$module_dir/gifs/exo32b.gif></th></table>
helptext=<a onmouseover="return escape('$extratext')"><font color=blue>help</font></a>

!if $R=1
    a=!randitem 2,3,4,5,6,7,8,9
    c=!randitem 1,2,3
    k=!randint 1,7
    k1=sqrt(10),10,10*sqrt(10),100,1000,1/10,1/100
    k2=\sqrt{10},10,10\cdot \sqrt{10},100,1000,\frac{1}{10},\frac{1}{100}
    k3=1/2,1,3/2,2,3,-1,-2
    b=!item $k of $k1 
    B=!item $k of $k2
    d=!item $k of $k3
    e=!exec pari E=$d/($a^$c)\
    printtex(E)
    e1=!line 1 of $e
    e2=!line 2 of $e
    answer$n=10^($e1)
    texanswer$n=\rightarrow x \,\,=\,\, 10^{$e2}
    formula$n= ^{$a}\log \left( ^{x}\log\left( $B \right) \right)}\,\,=\,\,$c
 !exit
!endif 

!if $R>1
    a=!randitem 2,3,4,5,6,7,8,9
    c=!randitem 1,2,3
    b=!randitem 2,3,4,5,6,7,8,9
    d=$[$a^$c]
    formula$n= ^{$a}\log \left( ^{x}\log($b) \right)}\,\,=\,\,$c
    #x1=10^((log($b)/log(10))/$d)
    x1=$b^(1/$d)
    X1=$b^{\frac{1}{$d}}
    answer$n=$x1
    texanswer$n= x \,=\, $X1 
 !exit
!endif 

