Programmeren in COBOL/IF en lussen/Oefeningen

Dit zijn oefeningen voor het hoofdstuk if en lussen. De opgaven zijn opgedeeld in theorie en praktijk. De opgaven komen als eerst en vanonder zijn de oplossingen. Let wel dat er meerdere mogelijke oplossingen zijn voor een opgave, zeker naarmate het moeilijker wordt.

Opgaven

Theorie

• Geef de 5 relatiecondities.

Praktijk

Opgave 1: Temperatuur inlezen

Schrijf een programma waar de gebruiker een temperatuur moet ingeven. Van -99 tot +99. Als het onder nul is moet het programma zeggen "De temperatuur is onder nul.". Als het boven nul met het "De temperatuur is boven nul." zeggen en wanneer het nul is moet het zeggen "De temperatuur bedraagt 0".

Oplossingen

Theorie

• Geef de 5 relatiecondities.

>, <, =, >= en <=

Praktijk

Opgave 1: Temperatuur inlezen

COBOL-code:

       IDENTIFICATION DIVISION.
       PROGRAM-ID. tempinlezen.

       DATA DIVISION.
       WORKING-STORAGE SECTION.
       77  temp PIC S99.

       PROCEDURE DIVISION.
       hoofd.
           DISPLAY "geef een temperatuur(van -99 tot 99)."
           ACCEPT getal

           IF temp < 0
             DISPLAY "De temperatuur is onder nul."
           ELSE
           IF temp > 0
             THEN DISPLAY "De temperatuur is boven nul."
             ELSE DISPLAY "De temperatuur bedraagt 0."
           END-IF
           STOP RUN.