Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 07.05.2008, 22:35   #1
[Smarik]
Веб-разработчик
Форумчанин
 
Аватар для [Smarik]
 
Регистрация: 16.01.2008
Сообщений: 451
По умолчанию Запись в файл

Нужно записать матрицу смежности и дополнение в файл. С етим проблем нет, но запись елементов матрицы происходит в строку...как сделать чтобы записывалось так же как они распологаются в таблице...
123
456
789
вроде етого, количество строк и столбцов заранее неизвестно
Код:
for i:=1 to v do
for j:=1 to v do
begin
write(f,massiv[j,i]);
end;
вот цикл записи, где v - ето количество вершин...тоесть при значении 5 таблица создает 5 столбцов и 5 строк.
Я ваш новый друг, смиритесь!
[Smarik] вне форума Ответить с цитированием
Старый 07.05.2008, 22:43   #2
Xardas
Сисадмин
Форумчанин
 
Аватар для Xardas
 
Регистрация: 28.12.2007
Сообщений: 320
По умолчанию

Если файл текстовый записывайте так же, как и при выводе на экран в консоли... Если записать на ту же строчку используем write(...), на следующую - writeln(...)
Xardas вне форума Ответить с цитированием
Старый 07.05.2008, 22:52   #3
[Smarik]
Веб-разработчик
Форумчанин
 
Аватар для [Smarik]
 
Регистрация: 16.01.2008
Сообщений: 451
По умолчанию

так вся матрица находится в массиве massiv[i,j] тоесть так легко по строкам не записать, надо какое то условие, например v=5 тогда после каждого 5-го символа ставим #13, сейчас сообразить не могу как так прописать, жду помощи.
Я ваш новый друг, смиритесь!
[Smarik] вне форума Ответить с цитированием
Старый 07.05.2008, 22:55   #4
Xardas
Сисадмин
Форумчанин
 
Аватар для Xardas
 
Регистрация: 28.12.2007
Сообщений: 320
По умолчанию

Если файл текстовый то вот что я имел в виду

Код:
for i:=1 to v do  begin 
for j:=1 to v do   
write(f,massiv[j,i]);   
writeln(f);
end;
Xardas вне форума Ответить с цитированием
Старый 07.05.2008, 23:26   #5
[Smarik]
Веб-разработчик
Форумчанин
 
Аватар для [Smarik]
 
Регистрация: 16.01.2008
Сообщений: 451
По умолчанию

Вроде должно работать, но я у себя с циклами уже запутался, прога вылетает, явно из за того что из за цикла код изменился и файл криво работать стал, у меня пол четвертого утра, спать пора...прогу желательно завтра бы, чтобы после праздников новую программу взять. Она работает там надо разобраться с созданием файла (до создания цикла выше файл работал) полюбому накосячил с begin end; в циклах...кому не лень разберитесь и если куча времени можно и код оптимизировать, заранее спасибо.
Вложения
Тип файла: zip 2.zip (248.0 Кб, 8 просмотров)
Я ваш новый друг, смиритесь!
[Smarik] вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Запись в файл Titan123 Общие вопросы Delphi 6 23.08.2008 01:12
Запись в файл С++ Viteks Общие вопросы C/C++ 3 18.04.2008 13:18
Запись в файл В_И_К_Т_О_Р Помощь студентам 9 30.01.2008 22:46
запись в файл Prisian Общие вопросы Delphi 6 24.07.2007 13:43