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

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

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

Код к задаче: «В созданом файле иероглифы - Turbo Pascal»

textual
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.
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.

12   голосов, оценка 4.083 из 5


СДЕЛАЙТЕ РЕПОСТ