image=0
checkfile=exos/checkfile8.proc
!set n=$counter
!if $level =0
    R=$counter
!else
    R=$level
!endif        
!if $R>0
!endif
var2=Y
var3=Z
var1=X
var4=#

pm=!randitem +,-
mp=!randitem 1,-1
m1=!randint 20,100
m2=!randint 1,$m1
m1=$[$mp*$m1]
m2=$[$mp*$m2]

q=!randint 10,100
q1=$[$q*10]
q2=!randint 1,$q

periode=!randint 3,40
jaar2=!date +%Y
jaar1=$[$jaar2-$periode]
#A=m1*t $pm q1 => A=m1*((M-($pm q1))/m2) $pm $q1
#M=m2*t $pm q2 =>t=(M-($pm q1))/m2


tot=!exec pari A=$m1*(($var1-($pm $q1))/$m2) $pm $q1\
printtex(A)
answer$n=!line 1 of $tot
texanswer$n=!line 2 of $tot
texanswer$n=$var2= $(texanswer$n)
# gemiddeld aantal delicten per jaar in die periode
D1=$[$m2*($jaar1) $pm $q1]
D3=$[$m2*($jaar2) $pm $q1]
G$n=$[(abs($D3-$D1))/($periode)]

!if $taal=nl
    exotitle=
    criminaliteit=!randitem de criminaliteit,\
    het voetbal vandalisme,\
    het vandalisme,\
    de overlast veroorzaakt door jeugdbendes,\
    de georganiseerde misdaad,\
    het rijden onderinvloed,\
    het aantal winkeldiefstallen,\
    het aantal tasjesroof incidenten,\
    het aantal gewapende overvallen
    
    toegenomen=!randitem toegenomen,gestegen
    afgenomen=!randitem afgenomen,gedaald
    !if $m1>0
	verandert=$toegenomen
	groei=groei
    !else
	verandert=$afgenomen
	groei=krimp 
    !endif       
    question$n=In veel grote steden is $criminaliteit de laatste jaren sterk $verandert .<br>\
    Onderzoekers menen dat er een verband bestaat tussen het inwoneraantal en het aantal geregistreerde delicten.<br>\
    Bij een grootschalig onderzoek in een grote stad werd tussen $jaar1 en $jaar2 een lineair verband gevonden voor de $groei van de bevolking<br>\
    <center><table border=1 cellpadding="10"><th><tt>\
    $var2 = $m1 &times; $var3 $pm $q1 \
    </tt></th></table></center><p>\
    <em>waarin $var2 het aantal inwoners (in duizenden) is <br>en $var3 de tijd is in jaren (sedert $jaar1) .</em><br>\
    Voor de onwikkeling van "$criminaliteit" tussen $jaar1 en $jaar2 vonden de onderzoekers de formule:<p>\
    <center><table border=1 cellpadding="10"><th><tt>\
    $var1 = $m2 &times; $var3 $pm $q2 \
    </tt></th></table></center>\
    <em>Waarbij $var1 het aantal gepleegde delicten is<br>\
    en $var3 de tijd in jaren sinds $jaar1.</em>
    
    formula$n=Geef de formule die de relatie beschrijft tussen het inwoneraantal en het aantal gepleegde delicten.
    
    #Druk $var2 uit in $var1<br><small><em>geef dus een formule voor $var2 als functie van $var1</em></small>
!else
    exotext=
    question$n=
!endif
