В созданом файле иероглифы - Turbo Pascal

Формулировка задачи:

Создал пробный файл (цикл из 5 чисел), который записует их в файл в txt формате, но в нем только иероглифы... В чем может быть проблемма?

Решение задачи: «В созданом файле иероглифы»

Листинг программы

uses Crt;
 var
 f:text;
 i,a:integer;
 
begin
Clrscr;
assign(f,'FILE.TXT');
rewrite(f);
writeln('BBeguTe 10 4ucel: ');
for i:=1 to 10 do
 begin
  readln(a);
  write(f,a);
 end;
 write('File coxpaHeH pod imenem "File.txt"');
 close(f);
 readln
end.

Объяснение кода листинга программы

В начале кода используется библиотека Crt, которая является стандартной для языка Turbo Pascal.
Переменная f типа text предназначена для работы с текстом.
Переменная i типа integer используется для хранения числовых значений.
Переменная a также типа integer.
Строка 'BBeguTe 10 4ucel:' означает, что в файл будет записано число 10 и после него 4 символа (возможно, это какой-то код или иероглиф).
Цикл for i:=1 to 10 do означает, что будет выполняться блок кода для каждого значения i от 1 до 10.
Внутри цикла считывается значение переменной a с помощью функции readln.
Значение переменной a записывается в файл с помощью функции write.
Строка 'File coxpaHeH pod imenem File.txt`` означает, что в файл будет записано строковое значениеFile coxpaHeH pod imenem File.txt`.
Функция close закрывает файл.
Функция readln считывает символ новой строки из стандартного ввода.
Конец программы.