Помогите исправить код

[bifshtex]

В текстовом файле хранятся квадратные целые матрицы порядка n. Преобразовать файл, удалив из каждой матрицы последнюю строку и последний столбец.

uses crt;
var
f,g:file of integer;
str_file:string;
x:integer;
i,j,n:byte;
begin
clrscr;
readln(str_file);
assign(f,str_file);
reset(f);
assing(g,'dop.txt');
rewrite(g);
while not (eof(f)) do
  begin
 for i:=1 to n do
  for j:=1 to n do
  read(f,x);
  while (i<>n-1) and (j<>n) do
   write(g,x);
   writeln(g);
 end;
close(f);
close(g);
erose(f);
rename(g);
readln
end.

[InfStudent]

А точнее проблему указать?

[InfStudent]

Дело в том что у вас вообще некорректно организованы файловые операции. К примеру строка writeln(g) это вобще ошибка, т.к. writeln не работает с типиз. файлами. Да и к тому же вследствии отсутствия инструкции seek у вас не будет перемещения по файлу   

[InfStudent]

Плюс ко всему а где переменная для текстового файла?

[InfStudent]

Вобще то интересный вопрос: А выходной файл можно делать типиз.? Так как по заданию получается что файл то должен быть текстовым даже после преобразования. Если это так то:
1.Загружаем  данные размером n в многомерный динамич. массив из файла
2. Удаляем в нем строку и столбец последний.
3. Записываем результат в новый текстовый файл
4. Если исх. файл не EoF, то на шаг 1       

[bifshtex]

эта задача на работу с текстовыми файлами..
InfStudent, пожалуйста, помоги мне набрать программу, не фига у меня не получается(((

[InfStudent]

помогу только не гарантирую что сегодня ну и Данила с Lu может чем поможет

[InfStudent]

Работа с динамич. мсассивом описана в FAQ

[Данила]

не особо помню..но вроде нужно использовать  output

[InfStudent]

А что ты имеешь ввиду под output?

[bifshtex]

ребят, я в общем в принципе понимаю, но не знаю как это реализовать...
мне преподаватель так сказал, что все задачи на текстовые файлы решаются по одному алгоритму:
1)исходный файл открываем для чтения
2)новый вспомогательный файл открываем для записи
3)организуем цикл ПОКА не конец исходного файла:
 -считываем информацию;
 -в нужном виде записываем в новом файле
4)закрываем файл
5)исходный файл удаляем
6)новый файл переименовываем

[InfStudent]

У тебя самого исх файла данных нет?

[InfStudent]

Ну это более конкретное исполнение моего алго прибавь сюда мои пункты о динамич. массиве и вот прога есть)

[InfStudent]

Я просто хоть сегодня бы сел за прогу но у самого д\з по инфе за горло держит

[Данила]

да,с аутпутом эт я проглючил....