Написать программу, которая по введенному числу от 1 до 11 (номеру класса) выдает соответствующее сообщение «Привет, k-классник». Например, если k=1, «Привет, первоклассник» — Pascal(Паскаль)

const
s1='Привет, ';
s2='классник';
var k:byte;
     s:string;
begin
repeat
write('Введите число от 1 до 11 k=');
readln(k);
until k in [1..11];
case k of
1:s:='Перво';
2:s:='Второ';
................
11:s:='Одиннадцати';
end;
write(s1+s+s2);
readln
end.