Programmeren in COBOL/IF en lussen/Oefeningen

Uit Wikibooks

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.

[bewerk] Opgaven

[bewerk] Theorie

• Geef de 5 relatiecondities.

[bewerk] Praktijk

[bewerk] 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".

[bewerk] Oplossingen

[bewerk] Theorie

• Geef de 5 relatiecondities.

>, <, =, >= en <=

[bewerk] Praktijk

[bewerk] Opgave 1: Temperatuur inlezen

       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."
           END-IF
           IF temp > 0
             THEN DISPLAY "De temperatuur is boven nul."
             ELSE DISPLAY "De temperatuur bedraagt 0."
           END-IF
           STOP RUN.