Не удаётся чтение из файла

[Cookson]

Здравствуйте.
Не удаётся получить текст из файла: текст возвращается, но со смещением на 64 знака по таблице ascii. Например, если файл содержит текст "абвгд", возвращает "рстуф". Что я делаю не так? Пример:

program test;
var
f:text;
n:string;
BEGIN
assign(f,'input.txt');
reset(f);
readln(f,n);
writeln(n);
readln();
END.

Среда разработки: Free Pascal.

[EvKont]

Пиши английские буквы (abcdef) в Pascal бывают проблемы с кирилицей

[Serge_Bliznykov]

проблемы бывают оттого, что нет понимания, что такое кодировка...
вы набираете "абвгдежзик" в кодировке Windows (Win-1251)
если этот же текстовый файл теперь открыть в кодировке DOS (866), то он будет выгядеть так:
"рстуфхцчшъ"

Так что, или пишите текст в нужной кодировке (судя по всему Вам для работы в консоли нужна кодировка DOS)
либо используйте функции перекодирования (поищите по ключевым словам ( AnsiToOem / OemToAnsi

[Cookson]

Большое спасибо.