Здравствуйте,программа простая,но есть один непонятный момент.Вот
Кодprogram QX_35;
{$APPTYPE CONSOLE}
uses
SysUtils;
const
M=3;
N=3;
Type
ARR=Array[1..M,1..N] of real;
K=real;
Var
F1:file of ARR;
F2:file of K;
Mas:ARR;
R,Sum:K;
i,j:byte;
begin
R:=0;
Sum:=0;
For i:=1 to M do
For j:=1 to N do
begin
write('Mas [',i,',',j,']= ');
readln(Mas[i,j]);
end;
Assign(F1,'D:/Массив.txt');
Assign(F2,'D:/Массив.txt');
Rewrite(F1);
write(F1,Mas);
close(F1);
Reset(F2);
For i:=1 to M do
For j:=1 to N do
begin
If (i>j) then
Read(F2,R);
Sum:=Sum+R
end;
close(F2);
writeln('Sum:=',Sum:3:3);
readln;
{ TODO -oUser -cConsole Main : Insert code here }
end.Теперь собственно вопрос:допустим я ввожу числа от 17 до 25.(В кодировке это как раз числа от 1 до 9)
Но в файле Массив.txt я вижу следущее:
Откуда берётся символ @ после каждой цифры?
Заранее спасибо.