bewerking=bewerking3.proc
n=$teller
!if $graad=0
    R=$teller
!else
    R=$graad
!endif
!if $R=1    
    getal=!randitem 2,3,4,5
    factor=!randitem 2,4,6,8
    TELLER1=!randitem 2,4,6,8
    NOEMER1=!randitem 5,6,7,8,9,10
    NOEMER1=$[$factor*$NOEMER1 ]
!endif


!if $R=2    
    getal=!randitem 2,3,4,5,6
    factor=$getal
    TELLER1=!randitem 1,3,5,7,9
    NOEMER1=!randitem 5,6,7,8,9,10
    NOEMER1=$[$factor*$NOEMER1 ]
!endif

!if $R=3    
    getal=!randitem 2,3,4,5,6
    factor=!randitem 2,3,4,5,6
    factor=$[$factor*$getal]
    TELLER1=!randitem 2,3,4,5,6,7,8
    NOEMER1=!randitem 5,6,7,8,9,10
    NOEMER1=$[$factor*$NOEMER1 ]
!endif


!if $R>3    
    getal=!randitem 2,3,4,5
    factor=!randitem 4,6,8,10
    TELLER1=!randitem 2,4,6,8,10,12
    NOEMER1=!randitem 5,6,7,8,9,10,12,14,16
    NOEMER1=$[$factor*$NOEMER1 ]
!endif

##ant1/ant2 + ant3/ant4 = ant5ant6 
##GOED1/GOED2 + GOED3/GOED4 = GOED5/GOED6

E=!exec pari ($getal*$TELLER1)/$NOEMER1
!if / notin $E
    GOED3=$E
    GOED4=1
    EXTRA=  = $GOED3
!else
    E=!replace internal / by , in $E    
    GOED3=!item 1 of $E
    GOED4=!item 2 of $E
    EXTRA=
!endif

GOED1=$[$getal*$TELLER1]
GOED2=$NOEMER1

antwoord$n=$getal \times \frac{$TELLER1}{$NOEMER1} =\
    \frac{$getal \times $TELLER1}{$NOEMER1} =\
    \frac{$[$getal*$TELLER1]}{$NOEMER1} = \frac{$GOED3}{$GOED4} $EXTRA


!if $taal=nl
    nivo_title=een breuk en een getal vermenigvuldigen & vereenvoudigen
    somtekst$n=<p align="left">Vermenigvuldig de breuk met het getal <br>\
    en vereenvoudig het resultaat.<br>\
    <small>indien mogelijk...</small><br>
!else
    nivo_title=Multiply a fraction and an integer
    somtekst$n=<p align="left">Multiply the fraction and the integer.<br>\
    And then reduce the result as far as you can.<br>\
    <small>if possible...</small><br>
!endif

opgave$n=$getal \times \frac{$TELLER1}{$NOEMER1} =
