Описать множество рабочих дней недели - Turbo Pascal
Формулировка задачи:
Описать множество рабочих дней недели.
Решение задачи: «Описать множество рабочих дней недели»
textual
Листинг программы
type day_of_work = (monday, tuesday, wednesday, thursday, friday); var days: set of day_of_work;
Объяснение кода листинга программы
В данном коде описывается множество рабочих дней недели.
- Создается тип данных
day_of_work, который представляет собой набор дней недели. - Создается переменная
daysтипаset of day_of_work, которая будет хранить множество рабочих дней недели. В данном случае, в множествеdaysбудут содержаться все дни недели, начиная с понедельника и заканчивая пятницей.