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

Для решения задачи на языке Паскаль можно использовать конструкцию case, которая идеально подходит для выбора из множества вариантов. Программа будет принимать на вход номер дня недели (целое число от 1 до 7) и выводить название соответствующего дня.

Вот пример программы:

pascal
Копировать код
program DayOfWeek;
var
  day: Integer;
begin
  Write('Введите номер дня недели (1-7): ');
  ReadLn(day);
  case day of
    1: WriteLn('Понедельник');
    2: WriteLn('Вторник');
    3: WriteLn('Среда');
    4: WriteLn('Четверг');
    5: WriteLn('Пятница');
    6: WriteLn('Суббота');
    7: WriteLn('Воскресенье');
  else
    WriteLn('Неверный номер дня недели. Введите число от 1 до 7.');
  end;
end.

Пояснение:

1. Программа запрашивает у пользователя номер дня недели.

2. В конструкции case проверяется значение переменной day, и в зависимости от числа выводится название дня недели.

3. В случае ввода числа, не входящего в диапазон от 1 до 7, выводится сообщение об ошибке.