Порядок выполнения
Общее замечание. Каждое действие по разработке программы должно завершаться работоспособной промежуточной версией. Короче, нажимайте Ctrl+F9 как можно чаще!
1. Определить, как функция DayWeek нумерует дни недели. Для этого написать и выполнить простейшую тестовую программу для вызова функции DayWeek, задав год 2011, месяц Октябрь, диапазон дней от 1 до 7.
2. Объявить массив размером 7 строк (дни недели) по 6 элементов (недели месяца).
3. Заполнить массив нулями, используя двойной цикл или процедуру FillChar.
4. Вывести массив дней месяца (пока нули).
5. Определить номер ряда 1-го числа месяца (номера месяца и года (текущих) передать как числа) с помощью функции DayWeek.
6. Расположить номера дней (от 1 до 31) месяца в массиве.
7. Вывести массив дней месяца, вместо нулей выводить пробелы.
8. Добавить названия дней недели: типированная константа (7 элементов), вывести месяц с именами дней недели.
9. Добавить ввод номера месяца и номера года с клавиатуры.
10. Добавить максимальное число дней в месяце: типированная константа (12 элементов).
11. Добавить учет високосного года.
Оценка: удовлетворительно.
12. Добавить вывод имен месяцев (типированнная константа из 12 элементов).
13. Добавить ввод номеров месяца и года из командной строки по ключам /M, /Y, например: /M9 /Y2011 – сентябрь 2011 года. Если параметров недостаточно, то запрос на ввод в интерактивном режиме.
Оценка: хорошо
14. Сделать вывод 12-ти месяцев на одном экране, начиная с заданного месяца заданного года.
Оценка: отлично
Домашнее задание: проверяется на следующем занятии:
15. Добавить вывод Календаря в файл, на печать. Имя файла получить из командной строки по ключу /F (CON, РRN, <FileName>).
16. Добавить вывод заголовка, автора и справки по использованию Календаря (параметр = "/?")
17. Остальные возможности - по усмотрению преподавателя и студента:
- выделение воскресений (цвет, шрифт),
- указание праздников и их выделение,
- номера учебных недель,
- число часов рабочего времени,
-...
Дата добавления: 2015-09-27 | Просмотры: 366 | Нарушение авторских прав
|