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

nivo_title=!record 95 of lang/remarks.$taal
# Omrekenen van Rangnummer formule naar Recursieve formule
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

!if $R>0
    bewerking=nivo/bewerking3.proc
    !if $keuze=2
	# rekenkundig
	a=!randint 1,20
	r=!randitem 2,3,4,5,6,7,8,9
	ss=!record 30 of lang/remarks.$taal
	# Gegeven de Rangnummer formule van een $TYPE rij:<p align="center">\
	# U<sub>n</sub>=$a + $r(n-1)</p>Geef de Recursieve formule van deze rij.        
	somtekst$n=$ss
	GOED$n=U*(n-1)+$r,$a
	formule=!record 31 of lang/remarks.$taal
	# U(n)=U(n-1) + $r en U(1)=$a
	!for p=1 to 5
	    U=$[$a+$r*($p-1)]
	    goed$n=!append line <li>U<sub>$p</sub>=$U</ll> to $(goed$n)
	!next p
    !else
	# meetkundig
	a=!randint 1,20
	r=!randitem 2,3,4,5,6,7,8,9
	ss=!record 32 of lang/remarks.$taal
	# Gegeven de Rangnummer formule van een $TYPE rij:<p align="center">\
	# U<sub>n</sub>=$a&times;$r<sup>n-1</sup></p>Geef de Recursieve formule van deze rij.        
	somtekst$n=$ss
	GOED$n=$r*U*(n-1),$a
	formule=!record 33 of lang/remark.$taal
	# U(n)=$r&times;U(n-1) en U(1)=$a
	!for p=1 to 5
	    U=$[$a*$r^($p-1)]
	    goed$n=!append line <li>U<sub>$p</sub>=$U</ll> to $(goed$n)
	!next p
    !endif
    ss=!record 34 of lang/remarks.$taal
    # Het is een $TYPE rij...dus de Recursieve formule is: $formule 
    goed$n=<ul>$(goed$n)</ul>$ss
    !exit
!endif
