Уроки модуля (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. ПРИВЕТ-ПРГ.
Решение доступно после 3 попыток
Завершите структуру, введя РАЗДЕЛ ПРОЦЕДУРЫ, и выведите на консоль текст «HELLO COBOL», используя DISPLAY. Не забудьте завершить выполнение программы с помощью STOP RUN.
Показать подсказку
Под РАЗДЕЛЕНИЕМ ПРОЦЕДУРЫ напишите ДИСПЛЕЙ «HELLO COBOL». начиная с столбца 12 (11 пробелов) и СТОП, БЕГ. на следующей строке.
Решение доступно после 3 попыток