# no need for translation 
!set n=$teller
!if $graad =0
    R=$teller
!else
    R=$graad
!endif        

nivo_title=!record 23 of lang/remarks.$taal
# De Meetkundige Rij<br>Geef de termen
multiplechoice=0                                                                                               
keuze=!randitem 1,2                                                                                          
!if $keuze=1
    TYPE=!record 12 of lang/remarks.$taal
    # Meetkundige
    NTYPE=!record 13 of lang/remarks.$taal
    # Rekenkundige
!else
    TYPE=!record 13 of lang/remarks.$taal
    # Rekenkundige
    NTYPE=!record 12 of lang/remarks.$taal
    # Meetkundige
!endif
	
aantal_vragen=!randitem 3,4,5,6
bewerking=nivo/bewerking1.proc	

!if $keuze=1
    ss=!record 24 of lang/remarks.$taal
    somtekst$n=$ss
    # Gegeven de onderstaande <em>exponenti&euml;le functie</em><br>Met <em>f</em>&nbsp;\
    # kun je een rij maken met: u<sub>1</sub>=<em>f</em>(0) , u<sub>2</sub>=<em>f</em>(1) ,\
    # u<sub>3</sub>=<em>f</em>(2) ...<br>Geef de eerst $aantal_vragen termen van deze rij.
    !if $R=1
	a=!randitem 2,3,4,5,6,7,8,9,10,11,12
	opgave$n=f(x) = $a^{x}
	!for p=1 to $aantal_vragen
	    G=$[$a^($p-1)]
	    GOED$n=!append item $G to $(GOED$n)
	    goed$n=!append line <li>u<sub>$p</sub>=$G</li> to $(goed$n)
	!next p
	goed$n=<ul>$(goed$n)</ul>
	!exit
    !endif
    !if $R>1
	b1=!randitem 1,3,5,7
	b2=!randitem 2,4,6,8,10
	a=!randitem 2,3,4,5,6,7,8,9,10,11,12
	b=!exec pari printtex($b1/$b2)
	opgave$n=f(x) = $a \cdot \left( $b \right)^{x}
	!for p=1 to $aantal_vragen
	    G=$[$a*($b1/$b2)^($p-1)]
	    GOED$n=!append item $G to $(GOED$n)
	    goed$n=!append line <li>u<sub>$p</sub>=$G</li> to $(goed$n)
	!next p
	goed$n=<ul>$(goed$n)</ul>
	!exit
    !endif
!else
    ss=!record 25 of lang/remarks.$taal
    somtekst$n=$ss
    !if $R=1                                                                                                       
	a=!randitem 2,3,4,5,6,7,8,9,10,11,12                                                                       
        b=!randitem 2,3,4,-2,-3,-4                                                                                 
        pm=!randitem +,-                                                                                           
        opgave$n=!texmath f(x) = $b*x $pm $a                                                                       
        !for p=1 to $aantal_vragen
	    G=$[$b*$p $pm $a]
	    GOED$n=!append item $G to $(GOED$n)
	    goed$n=!append line <li>u<sub>$p</sub>=$G</li> to $(goed$n)                                            
	!next p
	goed$n=<ul>$(goed$n)</ul>
	!exit
    !endif
    !if $R>1
	a=!randitem 2,3,4,5,6,7,8,9,10,11,12
	b=!randitem 2,3,1/2,1/3,1/4,1/5,2/3,3/4,4/5,-2,-3,-1/2,-1/3,-1/4,-1/5,-2/3,-3/4,-4/5
	pm=!randitem +,-
	opgave$n=!texmath f(x) = $b*x $pm $a
	parivraag=$empty
	!for p=1 to $aantal_vragen
	    parivraag=!append line ($b)*$p $pm ($a) to $parivraag
	!next p
	totaal=!exec pari $parivraag
	!for p=1 to $aantal_vragen
	    G=!line $p of $totaal
	    GOED$n=!append item $G to $(GOED$n)
	    goed$n=!append line <li>u<sub>$p</sub>=$G</li> to $(goed$n)
	!next p
	goed$n=<ul>$(goed$n)</ul>
	!exit
    !endif  
!endif

!exit