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

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

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

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 16.03.2011, 17:34   #1
Ko$
Пользователь
 
Регистрация: 21.12.2010
Сообщений: 91
Радость Типизированные файлы

Всем спасибо кто помогал!!!Доделал почти все задачи одна осталась:

Создать типизированные файлы f и g, компонентами которых являются случайные целые числа. Записать в файл h сначала компоненты файла f, а затем компоненты файла g с сохранением порядка.

Признателен за помощь!!!
Ko$ вне форума Ответить с цитированием
Старый 16.03.2011, 23:42   #2
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

а в чём сложности то?
вот примерно так (на Паскаль):
Код:
var f, g, h : file of integer;
   i, N, iOne : integer;
begin
   Randomize;
   WriteLn('Введите, сколько элементов должно быть в файле f: ');
   Readln(N);
   Assign(f, 'file_F.dat');
   Rewrite(f);
   for i:=1 to N do Write(f, Random(MaxInt));
   Close(f);

   WriteLn('Введите, сколько элементов должно быть в файле G: ');
   Readln(N);
   Assign(g, 'file_G.dat');
   Rewrite(g);
   for i:=1 to N do Write(g, Random(MaxInt));
   Close(g);

   Assign(h, 'file_H.dat');
   Rewrite(h);

   Reset(f);
   while not eof(f) do begin
      read(f, iOne);
      write(h, iOne);
   end;
   Close(f);
   
   Reset(g);
   while not eof(g) do begin
      read(g, iOne);
      write(h, iOne);
   end;
   Close(g);

   Close(h);
   WriteLn('Создание файла H завершено.');
  
   readln;
end.
Serge_Bliznykov вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Типизированные файлы Сеня2007 Помощь студентам 5 29.11.2010 08:06
Файлы данных.Типизированные файлы. вылка Помощь студентам 6 17.05.2010 15:42
типизированные файлы 534 Помощь студентам 3 10.05.2010 21:55