Напишите программу, которая по номеру дня недели выводит "Рабочий день", если это день с понедельника по пятницу, или "Суббота" или "Воскресенье". Язык Паскаль.

26 Сен 2019 в 04:43
233 +1
0
Ответы
1
program DayOfWeek;
var day: integer;
begin
write('Введите номер дня недели (1 - Понедельник, 2 - Вторник, ..., 7 - Воскресенье): ');
readln(day);
case day of
1: writeln('Рабочий день');
2: writeln('Рабочий день');
3: writeln('Рабочий день');
4: writeln('Рабочий день');
5: writeln('Рабочий день');
6: writeln('Суббота');
7: writeln('Воскресенье');
end;
end.

Программа запрашивает у пользователя номер дня недели и выводит соответствующее сообщение в зависимости от выбранного дня.

19 Апр 2024 в 19:26
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир