Решение задачи Case 1

# include <iostream>
# include <windows.h>
# include <cmath>
 
using namespace std;
 
int main ()
 
{
  SetConsoleCP(1251);
  SetConsoleOutputCP(1251);
 
  int k;
  cout << "Введите целое число в диапазоне 1-7:  "; 
  cin >> k;
  switch (k) {
  	case 1: cout << "Понедельник\n"; break;
  	case 2: cout << "Вторник\n"; break;
  	case 3: cout << "Среда\n"; break;
  	case 4: cout << "Четверг\n"; break;
  	case 5: cout << "Пятница\n"; break;
  	case 6: cout << "Суббота\n"; break;
  	case 7: cout << "Воскресенье\n"; break;
    default: cout << "Нет такого дня недели.\n";
  }
  
 
  system ("pause");
  return 0;
}

i = str(input("Введите число из диапазона 1-7: "))
week_days = {
    '1': 'понедельник',
    '2': 'вторник',
    '3': 'среда',
    '4': 'четверг',
    '5': 'пятница',
    '6': 'суббота',
    '7': 'воскресенье'
}
print(week_days[i])
									

program Case1;
var
  D:Integer;
begin
  Write('Введите номер дня недели: ');
  Readln(D);
  Case D of
   1:   Writeln('Понедельник.');
   2:   Writeln('Вторник.');
   3:   Writeln('Среда.');
   4:   Writeln('Четверг.');
   5:   Writeln('Пятница.');
   6:   Writeln('Суббота.');
   7:   Writeln('Воскресенье.');
  end;
end.