Не распознаёт коды русских букв. Задача String6. Дан символ C ...если русскую — вывести строку «rus».

Куда делись русские буквы?

var i:integer; begin for i:=32 to 255 do write(i,’ ‘,chr(i),’ '); end.

Они не русские там. Print(Ord(‘А’)) - выведите код первой русской и посмотрите