4.2 Afronden

Om een getal met cijfers achter de komma af te ronden op een geheel getal is in sommige programmeertalen een trucje nodig: tel 0,5 op bij het getal en laat dan alles achter de komma weg. In COBOL is dat beter geregeld.

onthoud

Rekenkundige opdrachten kunnen we voorzien van het woord rounded om afronding te bewerkstelligen.

01 GEHEEL    picture 99.
   ...

    compute GEHEEL rounded = 12.2 + 7.3
  

De variabele GEHEEL krijgt nu de waarde 20. Zonder het woordje rounded zou de computer het getal afkappen. GEHEEL zou dan de waarde 19 krijgen.

We hoeven niet per se op een geheel getal af te ronden. De computer rondt af op het laatste cijfer. Het komt vaak voor dat we een bedrag op centen moeten afronden. Dat wil zeggen dat de afronding plaatsvindt op het tweede cijfer na de decimaalaanduiding.

01 bedrag     picture 999V99.
   ...

    compute bedrag rounded = 1.06 * bedrag
  

Het veld bedrag is na deze opdracht verhoogd met 6 procent. Daarbij is afgerond op centen. Stel dat bedrag oorspronkelijk de waarde 35.95 heeft. Deze waarde verhoogd met 6 procent is gelijk aan 38.107. Dat getal wordt afgerond tot 38.11 en dat is de nieuwe waarde van het veld bedrag.