Лабораторный практикум по программированию на языке Паскаль. Найханова Л.В - 34 стр.

                            d := 1; m := succ(m);
                         end
                         else d := d + 1
    end; { case }
    Write('Следующая дата: ', d : 2); { вывод результата }
    Case m of { выбор названия месяца по номеру месяца}
       jan: write(' января ');
       feb: write(' февраля ');
       mar: write(' марта ');
       apr: write(' апреля ');
       may: write(' мая ');
       jun: write(' июня ');
       jul: write(' июля ');
       aug: write(' августа ');
       sep: write(' сентября ');
       oct: write(' октября ');
       nov: write(' ноября ');
       dec: write(' декабря ')
    end; { case }
    Writeln(g : 5,' года ')
End.
Пояснения к программе:
В современном календаре каждый год, номер которого делится на 4, является високосным,
за исключением тех номеров, которые делятся на 100 и не делятся на 400.
Контрольные вопросы
1. Что такое перечислимый тип?
2. Какие операции допускаются с данными перечислимого типа?
3. Какие стандартные функции можно использовать для данных перечислимого типа?
4. Что такое ограниченный тип?
5. Может ли быть последующее значение больше предыдущего                при определении
ограниченного типа?
6. Какие операции допускаются над переменными ограниченного типа?

Задание к работе
Выполнить индивидуальное задание.
Методические указания
Перед выполнением индивидуального задания по вариантам 1-7, 10 ознакомьтесь с
примером, приведенным выше.
При выполнении индивидуального задания придерживаться следующей технологии:
1) изучить словесную постановку задачи, выделив при этом все виды данных;
2) выбрать метод решения задачи, если это необходимо;
3) разработать программу на языке Паскаль, используя перечислимые и ограниченные типы
    данных;
4) разработать контрольный тест к программе;
5) отладить программу;
6) представить отчет по работе к защите.
Содержание отчета
1. Титульный лист.
2. Словесная постановка задачи.
3. Графический или текстуальный алгоритм решения задачи.

                                                                                    34