Постройте алгоритм и составьте программу, по которой будет реализован следующий сценарий: компьютер запрашивает номер дня недели, после ввода компьютер
сообщает название этого дня. Например, если ввели 1, то выведется фраза «Это понедельник» и т. д.

var
  n: integer;

begin
  Write('Введите номер дня недели (1-7) -> ');
  Readln(n);
  case n of
    1: Writeln('Это понедельник');
    2: Writeln('Это втоник');
    3: Writeln('Это среда');
    4: Writeln('Это четверг');
    5: Writeln('Это пятница');
    6: Writeln('Это суббота');
    7: Writeln('Это воскресенье');
  else Writeln( 'Это неверный ввод');
  end
end.

Тестовое решение:

Введите номер дня недели (1-7) -> 5
Это пятница