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

#include<iostream>
#include<cmath>
using namespace std;
int main()
{
    setlocale(LC_ALL, "Russian");
    int k;
 
    cout << "k = "; cin >> k;
 
    switch (k)
    {
        case 1: cout << "плохо"; break;
        case 2: cout << "неудовлетворительно"; break;
        case 3: cout << "удовлетворительно"; break;
        case 4: cout << "хорошо"; break;
        case 5: cout << "отлично"; break;
        default: cout << "ошибка";
    }
 
    cout << endl << endl;
 
    system("pause");
}

K = str(input("Введите число из диапазона 1-5: "))
ocenka = {
    '1': 'плохо',
    '2': 'неудовлетворительно',
    '3': 'удовлетворительно',
    '4': 'хорошо',
    '5': 'отлично'
}
try:
    print(ocenka[K])
except KeyError as e:
    print('Ошибка')
									

program Case2;
var
  K:Integer;
begin
  Write('Введите число оценки: ');
  Readln(K);
  Case K of
   1:   Writeln('плохо');
   2:   Writeln('неудовлетворительно');
   3:   Writeln('удовлетворительно');
   4:   Writeln('хорошо');
   5:   Writeln('отлично');
   else Writeln('ошибка');
  end;
end.