6. Напишите программу для решения задачи № 11 к §3.5 (определение дня недели).

Для определения дня недели по номеру (от 1 до 7) можно использовать оператор выбора case или цепочку условных операторов if-then-else.

Предполагается, что номер 1 соответствует понедельнику, 2 – вторнику и так далее до 7 – воскресенья.

Пример программы на Паскале с использованием оператора case:

var dayNumber: integer;
dayName: string;

begin
  Write('Введите номер дня недели (1-7): ');
  Readln(dayNumber);

  case dayNumber of
    1: dayName := 'Понедельник';
    2: dayName := 'Вторник';
    3: dayName := 'Среда';
    4: dayName := 'Четверг';
    5: dayName := 'Пятница';
    6: dayName := 'Суббота';
    7: dayName := 'Воскресенье';
    else dayName := 'Некорректный номер';
  end;

  Writeln('День недели: ', dayName);
end.

Пояснение:

• Программа запрашивает у пользователя номер дня недели.
• Оператор case проверяет значение переменной dayNumber.
• В зависимости от введенного числа, переменной dayName присваивается соответствующее название дня недели.
• Если введен некорректный номер (не от 1 до 7), выводится сообщение об ошибке.

Пример программы на Паскале с использованием if-then-else:

var dayNumber: integer;
dayName: string;

begin
  Write('Введите номер дня недели (1-7): ');
  Readln(dayNumber);

  if dayNumber = 1 then
    dayName := 'Понедельник'
  else if dayNumber = 2 then
    dayName := 'Вторник'
  else if dayNumber = 3 then
    dayName := 'Среда'
  else if dayNumber = 4 then
    dayName := 'Четверг'
  else if dayNumber = 5 then
    dayName := 'Пятница'
  else if dayNumber = 6 then
    dayName := 'Суббота'
  else if dayNumber = 7 then
    dayName := 'Воскресенье'
  else
    dayName := 'Некорректный номер';

  Writeln('День недели: ', dayName);
end.

Оба варианта решают поставленную задачу.