1. Home
  2. /
  3. Cobol
  4. /
  5. Counter and Theme Toggle

Counter and Theme Toggle - Cobol Typing CST Test

Loading…

Counter and Theme Toggle — Cobol Code

Demonstrates a simple counter with theme toggling using COBOL variables and console output.

       IDENTIFICATION DIVISION.
       PROGRAM-ID. CounterProgram.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       01 COUNT        PIC 9(4) VALUE 0.
       01 IS-DARK      PIC X VALUE 'N'.

       PROCEDURE DIVISION.
       DISPLAY 'Counter: ' COUNT
       DISPLAY 'Theme: ' IS-DARK

       ADD 1 TO COUNT
       DISPLAY 'Counter: ' COUNT

       MOVE 'Y' TO IS-DARK
       DISPLAY 'Theme: ' IS-DARK

       SUBTRACT 1 FROM COUNT
       DISPLAY 'Counter: ' COUNT

       MOVE 0 TO COUNT
       DISPLAY 'Counter: ' COUNT

       STOP RUN.

Cobol Language Guide

COBOL (Common Business-Oriented Language) is a high-level, English-like programming language designed for business applications, financial systems, batch processing, and large-scale enterprise data operations. Known for reliability, readability, and long-term stability.

Primary Use Cases

  • ▸Banking and financial transaction systems
  • ▸Payroll and HR systems
  • ▸Insurance policy and claims processing
  • ▸Government mainframe workloads
  • ▸Batch data processing
  • ▸Large-scale enterprise reporting

Notable Features

  • ▸English-like syntax for clarity
  • ▸Exceptional stability for long-running systems
  • ▸Massive legacy ecosystem in enterprises
  • ▸Strong support for structured data processing
  • ▸Designed for business rules rather than hardware

Origin & Creator

Developed in 1959 by CODASYL (Conference on Data Systems Languages), with major contributions from Grace Hopper and the US Department of Defense.

Industrial Note

COBOL still powers core banking, insurance, payroll, and government systems worldwide - often handling billions of daily transactions in mission-critical environments.

More Cobol Typing Exercises

COBOL Simple AdditionCOBOL FactorialCOBOL Fibonacci SequenceCOBOL Array SumCOBOL Max of Two NumbersCOBOL Reverse StringCOBOL Even Numbers FilterCOBOL String Concatenation

Practice Other Languages

CReactPythonC++RustTypeScriptKotlinPHPJavaC#RubyMqlCqlN1qlCypher