помогите найти ошибку

[shifr]

procedureSaveInExcel(A, B, C: mas);
var i:integer;
MyFile:text;
begin
assign (MyFile,'D:\kursach.txt');
rewrite(MyFile);
write(MyFile, 't,c;','I,A;','U,B;');
writeln(Myfile);
fori:=0 to p do
begin
writeln(MyFile,A[i]:0:6,';', B[i]:0:6,';', C[i]:0:6,#13);
writeln(myfile);
end;
close(MyFile);
end;

Syntax error " : " expected but " < " found


Код нужно оформлять по правилам:
тегом [CODE]..[/СODE]
(это кнопочка на панели форматирования с решёточкой #)

Модератор

[Poma][a]

Покажите весь код.
Не верится, что ошибка в этой процедуре

[Вадим Мошев]

Syntax error " : " expected but " < " found

Надо строку указывать, где ошибка произошла.

------------------------



Первая строка слитно записана:

procedureSaveInExcel(A, B, C: mas);

Одна из ошибок.

-------------------

fori:=0 to p do

ещё одна строка слитно записана.

-----------------------------

writeln(MyFile,A[i]:0:6,';', B[i]:0:6,';', C[i]:0:6,#13);

Поскольку вы пользуетесь процедурой writeLn, последний аргумент (#13) - лишний