Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
NoviiMir
5 / 5 / 0
Регистрация: 23.09.2012
Сообщений: 411
#1

Скопировать данные, заданные массивом записи, из одного типизированного файла в другой - Turbo Pascal

18.12.2012, 20:32. Просмотров 521. Ответов 0
Метки нет (Все метки)

Делаю таким образом, но ничего не происходит. Копирую из файла g в t, предварительно считав массив записи.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Procedure Copy;
 Var g,t: file of AB;
     k,i: Integer;
 Begin
  Reading;
  Assign (g,'1.txt');
  Reset (g);
  Assign (t,'2.txt');
  Rewrite (t);
  k:=kol;
   For i:=1 to k do
     Write (t,bil[i]);
  Close (g);
  Close (t);
 end;
Reading - это процедура, считывающая массив из файла, kol - функция, которая считает количество данных в массиве.

Что тут не так? или, может, скажете, как лучше сделать, чтобы работало.
Заранее спасибо за помощь.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
18.12.2012, 20:32
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Скопировать данные, заданные массивом записи, из одного типизированного файла в другой (Turbo Pascal):

Скопировать из одного файла записей в другой записи, соответствующие заданному критерию - Pascal
Разработать программу работы с файлами записей. Каждая запись создаваемых (исходных) файлов содержит сведения согласно варианту. ...

Из одного файла переписать в другой заданные элементы - Pascal
Здравствуйте, необходимо составить программу

Не получается считать данные из типизированного файла в массив записи - Turbo Pascal
Очень прошу, помогите! Считываю таким образом: Assign (f,'bil.txt'); Reset(f); n:=0; while not Eof(f) do begin ...

Скопировать все отрицательные числа из одного файла вещественных чисел в другой (блок-схема) - Turbo Pascal
требуется скопировать все отрицательные числа из одного файла вещественных чисел в другой. program Example; ...

Перезаписать данные из одного файла в другой - Pascal
Хотел написать таким способом, но данные из файла не записываются в массив. Подскажите в чем проблема? program Project2; ...

Скопировать элементы из одного массива в другой - Pascal
Пусть описана константа и два типа-массива: const m = 3; type TMas1 = array of real; TMas2 = array of real; ...

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
18.12.2012, 20:32
Привет! Вот еще темы с ответами:

Удаление записи из типизированного файла по ID - Pascal
Вот процедура удаления по ID, из типизированного файла. Почему функция Pos не работает? выдает ошибку PROCEDURE DelClient; Var ...

Удаление записи из типизированного файла. - Pascal
Какими способами можно реализовать данную задачу? Из типизированного файла нужно удалить запись, номер которой указывается пользователем....

Отсортировать записи типизированного файла - Turbo Pascal
Нужно отсортировать записи типизированного файла.Вот базовый код: program Phone; uses crt; type book=record Name:string;...

Добавление записи в конец типизированного файла - Turbo Pascal
Есть типизированный файл. Append в типизированный файлах не работает. Подскажите кто может, как добавить запись в конец типизированного...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru