Модульні уроки (1/2)
Структура програми
COBOL (Common Business-Oriented Language) — одна з найдовше живучих мов програмування в історії, розроблена спеціально для ділових і фінансових програм. На відміну від сучасних мов, вона має жорстку й формальну структуру, поділену на розділи, які називаються Розділами.
Фіксований макет і формати області
У традиційних вихідних файлах COBOL кожен рядок розділено на певні області на основі стовпців:
- Стовпці 1-6 (область послідовності): історично використовувався для порядкових номерів перфокарт. Сьогодні воно зазвичай залишається порожнім.
- Стовпець 7 (область індикатора): використовується для позначення рядків коментарів зірочкою
*. - Стовпці 8-11 (область A): тут починаються заголовки підрозділів, розділів і абзаців.
- Стовпці 12-72 (область B): тут записуються фактичні виконувані оператори (наприклад,
DISPLAY,MOVEтощо). - Стовпці 73-80 (Область ідентифікації): історично ігнорувалися компілятором, використовувалися для внутрішньої ідентифікації.
У наших вправах ми будемо використовувати спрощене, але послідовне форматування, починаючи інструкції області B з відповідних пробілів (зазвичай 7 або 11 пробілів залежно від області).
Чотири основні відділи
Кожна повна програма COBOL поділена на чотири обов’язкові розділи, які мають відображатися в такому порядку:
-
IDENTIFICATION DIVISION.Містить метадані програми, наприклад назву програми, визначену ключовим словомPROGRAM-ID. -
ENVIRONMENT DIVISION.Визначає середовище, у якому виконується програма, і зіставляє фізичні файли з внутрішніми змінними. -
DATA DIVISION.Де оголошено всі змінні та структури даних, які використовує програма. -
PROCEDURE DIVISION.Містить виконувані інструкції (бізнес-логіку). Кожна програма має закінчуватися наSTOP RUN., щоб зупинити виконання.
Спробуйте самі
Напишіть початкові заголовки COBOL, ввівши IDENTIFICATION DIVISION і визначивши назву програми як HELLO-PRG.
Показати підказку
Напишіть ВІДДІЛ ІДЕНТИФІКАЦІЇ. починаючи з колонки 8 (7 пробілів) і в наступному рядку PROGRAM-ID. ПРИВІТ-PRG.
Рішення доступне після 3 спроб
Завершіть структуру, представивши PROCEDURE DIVISION і виведіть на консоль текст «HELLO COBOL» за допомогою DISPLAY. Не забудьте завершити виконання програми за допомогою STOP RUN.
Показати підказку
Під PROCEDURE DIVISION. напишіть DISPLAY «HELLO COBOL». починаючи з колонки 12 (11 пробілів) і СТОП БІГ. у наступному рядку.
Рішення доступне після 3 спроб