questiontype=0
cols=25
rows=1
inputs=1
n=$counter
sometext=!record 50 of lang/remarks.$taal
groeifactor=!item 2 of $sometext
checkfile=exos/checkfile3.proc
!if $level=0
    R=$counter
!else
    R=$level
!endif
!if $R=1
    x1=!randitem 1,2,3,4,5
    a=!randitem 2,3,4,5
    x2=$[$x1+$a]
    b=!randitem 2,3,4,5,6,7
    g=!randitem 2,3,4,5
    y1=$[$b*$g^($x1)]
    y2=$[$b*$g^($x2)]
    d=$[$y2/$y1]
    !goto READY
!endif

!if $R=2
    x1=!randitem -1,-2,-3,-4,-5
    a=!randitem 2,3,4,5,6,7,8,9
    x2=$[$x1+$a]
    b=!randitem 2,3,4,5,6,7
    g=!randitem 2,3,4,5,6,7,8,9
    y1=$[$b*$g^($x1)]
    y2=$[$b*$g^($x2)]
    d=$[$y2/$y1]
    !goto READY
!endif

!if $R>2
    x1=!randitem -1,-2,-3,-4,-5,1,2
    a=!randitem 5,6,7,8,9,10,11
    x2=$[$x1+$a]
    y1=!randint 1,20
    y2=!randint 1,25
    !if $y1=$y2
	y2=$[$y1+6]
    !endif
    d=$[$y2/$y1]
    g=$[$d^(1/$a)]
    b=$[$y1/($g^$x1)]    
!endif

:READY    

answer$n=$b*$g^t

texanswer$n=\left[ \begin{array}{l} $x2 - $x1\,=\,$a \\ \frac{$y2}{$y1}\,=\,$d \\ $groeifactor \,\,=\,\ $d^{1/$a} \end{array} \right] \rightarrow H(t)\,=\,$b\cdot $g^{t} 
ss=!record 71 of lang/remarks.$taal
#@Stel het functievoorschift op van een exponenti&euml;le functie H(t) ,<br>waarvan de grafiek gaat door de punten A($x1:$y1) en B($x2:$y2)<br><font color="green">Geef het functievoorschrift in zijn <em>algemene vorm</em>: H(t)=b&times;g<sup>t</sup></font> 
question$n=$ss

mathviewpanel=$module_title:H(t)=:
!if $teaching=1 or $image=1
    xmax=$[$x2+5]
    ymax=$[1.2*$y2]
    xmin=$[$x1-5]
    ymin=$[-0.2*$y2]
    plot=0
    draw=0
    functie1=$d*$g^($a*x)    
    functie2=$g^($a*x)
    insplot_data=$x1 $y1 \
    $x2 $y2
    #"(0,0) first"  at first  0, first  0
    insplot_set=size 0.6,0.6;label "  A ($x1:$y1)" at first $x1,first $y1 ;label "  B ($x2:$y2)" at first $x2,first $y2 ;grid ;pointsize 1;xzeroaxis;yzeroaxis;xlabel "<t-axis>";ylabel"<y-axis>" ;border
    helptext=!record 68 of lang/remarks.$taal
    #@ Hier staat een klein grafiekje van de functie</a>
    helptext=<a onmouseover="this.T_OPACITY=85;this.T_PADDING=10;this.T_WIDTH=220;return escape('<img src=$wims_ref_name?&session=$session&module=$module&cmd=getins&special_parm=insert-1.gif>')"><font color=blue>$helptext</font></a>
    !insplot [$xmin:$xmax][$ymin:$ymax] $b*$g^x notitle lt 1 ,"insplot_data" notitle with points
!endif 

!exit
