упорно выскакивает ошибка!, помогите! Опции

[-katrin-]

здравствуйте,
написала прогу на Borland Pascal (решение маленькой задачки)

проблема1:
упорно не отображаются русские буквы (меняла настройку в реестре, установила keyrus, создала bat-файл для запуска кейруса и потом паскаля - не помогает!!!)

проблема2:
после написания и успешной компиляции при запуске выдает сообщение об ошибке 105 (я так поняла - для writeln, пч другого ничего нет подозрительного)
для файла, папки и диска НЕ стоит галочка "только чтение"!
как тут быть? что исправить?
помогите, пожалуйста, по возможности решить обе проблемы, буду очень благодарна

[-katrin-]

задача:
для целого 1<=k<=99 напечатать фразу: "Мне К лет " (с возможными изменениями последнего слова).

текст

Код

program myAge;
var
    k: Integer;
    s,st: string;
begin
    write('Vvedite vash vozrast:');
    read(k);
    while (k<1) or (k>99) do
    begin
 writeln('Oshibka! Nuzhno vvesti chislo ot 1 do 99!');
 writeln('Vvedite vash vozrast:');
 read(k);
    end;

    case k of
 1 or 21 or 31 or 41 or 51 or 61 or 71 or 81 or 91: s:=' god';
 2 or 3 or 4 or 22 or 23 or 24 or 32 or 33 or 34 or 42 or 43 or 44 or 52 or 53 or 54 or 62 or 63 or 64 or 72 or 73 or 74 or 82
               or 83 or 84 or 92 or 93 or 94: s:=' goda';
    else
 s:=' let';
    end;
    Str(k, st);
       st:='Mne ' + st + s;
    writeln(st);
end.