# no need for translation 
!set n=$teller
!if $graad =0
    R=$teller
!else
    R=$graad
!endif        
nivo_title=!record 11 of lang/remarks.$taal
# De Meetkundige Rij<br>Bereken enkele termen.

multiplechoice=0
keuze=!randitem 1,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		


!if $R=1
    bewerking=nivo/bewerking2.proc
    multiplechoice=1
    aantal_vragen=!randitem 3,4,5,6
    GOED$n=!randint 1,$aantal_vragen
    termen=!randitem 4,5,6
    
    !for p=1 to $aantal_vragen
	rij$p=$empty
	r=!randitem 2,3,4
	a=!randitem 2,3,4,5,6,-2,-3,-4,-5,-6
	!if $p=$(GOED$n)
	    !if $keuze=1
		!for t=1 to $termen
		    U=$[$a*$r^($t)]
		    rij$p=!append item $U&nbsp; to $(rij$p)
		!next t
	    !else
		t=!randitem 3,4,5
		f=!randint 1,100
		!for b=1 to $termen
		    U=$[$b*$f+$r^($t)]
		    rij$p=!append item $U&nbsp; to $(rij$p)
		!next a
	    !endif
	    ss=!record 14 of lang/remarks.$taal
	    som=!append line $ss to $som
	!else
	    !if $keuze=1
		t=!randitem 3,4,5
		f=!randint 1,100
		!for b=1 to $termen
		    U=$[$b*$f+$r^($t)]
		    rij$p=!append item $U&nbsp; to $(rij$p)
		!next a
	    !else
		!for t=1 to $termen
		    U=$[$a*$r^($t)]
		    rij$p=!append item $U&nbsp; to $(rij$p)
		!next t
	    !endif
	    ss=!record 15 of lang/remarks.$taal
	    som=!append line $ss to $som
	!endif
    !next p
    ss=!record 16 of lang/remarks.$taal
    # Welke van de onderstaande rijen is een <b>$TYPE Rij</b>?<br><small>multiplechoice</small><p>
    somtekst$n=$ss
    goed$n=<table>$som</table>
 !exit
!endif

!if $R=2
    bewerking=nivo/bewerking1.proc
    r=!randitem 2,3,4,5,6,7,8,9
    a=!randitem 2,3,4,5,6,7,8,9,10
    aantal_vragen=$[$teller+2]
    !if $r=$a
	r=$[$a+1]
    !endif	
    termen=$empty
    terms=$empty
    som=$empty
    # formule a*r^n-1
    !if $keuze=1
	# meetkundige rij
	 formule=U<sub>n</sub>=$a&times;$r<sup>n-1</sup>
	!for p=1 to $aantal_vragen
	    terms=!append item $p to $terms
	    termen=!append item U<sub>$p</sub> to $termen
    	    t=$[$p-1]
	    U=$[$a*$r^($t)]
	    GOED$n=!append item $U to $(GOED$n) 
	    som=!append line <li>U<sub>$p</sub>=$a&times;$r<sup>$t</sup>=$U</li> to $som 
	!next p
    !else
	# rekenkundige rij
	f=!randint 1,10
	formule=U<sub>n</sub>=$[$a*$f] + $r(n-1)
	!for p=1 to $aantal_vragen
	    terms=!append item $p to $terms
	    termen=!append item U<sub>$p</sub> to $termen
    	    t=$[$p-1]
	    U=$[$a*$f+$r*$t]
	    GOED$n=!append item $U to $(GOED$n) 
	    som=!append line <li>U<sub>$p</sub>=$[$a*$f]+$r&times;$t=$U</li> to $som 
	!next p
    !endif
    ss=!record 17 of lang/remarks.$taal
    somtekst$n=$ss
    # Gegeven de <em>$TYPE rij</em> met <b>rangnummerformule</b>:<p align="center">$formule</p>\
    # Bereken de termen $termen van deze rij.
    goed$n=<ul>$som</ul>
 !exit
!endif

!if $R=3
    bewerking=nivo/bewerking1.proc
    a=!randitem 2,3,4,5,6,7,8,9,10
    aantal_vragen=$[$teller+2]
    !if $r=$a
	a=$[$r+1]
    !endif	
    termen=$empty
    terms=$empty
    som=$empty
    !if $keuze=1
	r=!randitem 2,3,4,5,6,7,8,9,10
	# meetkundg formule a*r^n-1
	formule=!record 18 of lang/remarks.$taal
	# U<sub>n</sub>=$r&times;U<sub>n-1</sub> met U<sub>1</sub>=$a
	!for p=1 to $aantal_vragen
	    terms=!append item $p to $terms
	    termen=!append item U<sub>$p</sub> to $termen
	    t=$[$p-1]
	    U=$[$a*$r^($t)]
    	    GOED$n=!append item $U to $(GOED$n) 
	    som=!append line <li>U<sub>$p</sub>=$a&times;$r<sup>$t</sup>=$U</li> to $som 
	!next p
    !else
	r=!randint 5,50
	# rekenkundige rij formule 
	formule=!record 19 of lang/remarks.$taal
	# U<sub>n</sub>=U<sub>n-1</sub> + $r met U<sub>1</sub>=$a
	!for p=1 to $aantal_vragen
	    terms=!append item $p to $terms
	    termen=!append item U<sub>$p</sub> to $termen
	    t=$[$p-1]
	    U=$[$a+$r*$t]
    	    GOED$n=!append item $U to $(GOED$n) 
	    som=!append line <li>U<sub>$p</sub>=$a+$r&times;$t=$U</li> to $som 
	!next p
    !endif
    ss=!record 20 of lang/remarks.$taal
    somtekst$n=$ss
    # Gegeven de <em>$TYPE rij</em> met <b>recursieformule</b>:<p align="center">$formule</p>\
    # Bereken de termen $termen van deze rij.
    goed$n=<ul>$som</ul>
 !exit
!endif

!if $R>3
    bewerking=nivo/bewerking1.proc
    aantal_vragen=2
    terms=$empty
    !if $keuze=1
	# meetkundig
	r=!randitem 2,3,4
        a=!randitem 2,3,4,5,6,7,8,9,10
        # formule a*r^n-1
        termen=!shuffle 3,4,5,6,7,8,9,10
	formule=$a&times;$r<sup>n-1</sup>
        !for p in 1,2
	    t=!item $p of $termen
	    f=$[$t-1]
	    U=$[$a*$r^($f)]
	    T$p=U<sub>$t</sub>=$U
	!next p
	d=!item 3 of $termen
	f=$[$d-1]
	b=$[$a*$r^$f]
	GOED$n=$a,$b
    !else
	# rekenkundig
	# a+r(n-1)
	r=!randitem 2,3,4,5,6,7,8,9,10
        a=!randitem 2,3,4,5,6,7,8,9,10
        termen=!shuffle 3,4,5,6,7,8,9,10
	formule=$a+$r(n-1)
	!for p in 1,2
	    t=!item $p of $termen
	    f=$[$t-1]
	    U=$[$a+$r*$f]
	    T$p=U<sub>$t</sub>=$U
	!next p
	d=!item 3 of $termen
	f=$[$d-1]
	b=$[$a+$r*$f]
	GOED$n=$a,$b
    !endif
    ss=!record 21 of lang/remarks.$taal
    somtekst$n=$ss
    # Gegeven de <em>$TYPE rij</em> met<p align="center"> $T1 <br> en <br>$T2</p>\
    # Bereken de termen U<sub>1</sub> en U<sub>$d</sub> deze rij
    terms=1,$d
    ss=!record 22 of lang/remarks.$taal
    goed$n=<ul><li>U<sub>1</sub>=$a</li><li>U<sub>$d</sub>=$b</li><li>$ss</li></ul>
    # De onderliggende $TYPE formule was: $formule
    
 !exit
!endif    
