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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 13.05.2022, 21:50   #1
DariaPospel
Новичок
Джуниор
 
Регистрация: 13.05.2022
Сообщений: 1
По умолчанию Из паскаля в C++

Дописывание в файл. В конец целочисленного двоичного файла дописать нечетные значения, содержащиеся в другом целочисленном текстовом файле. Итоговый файл должен иметь строго двоичный формат.
Примечание: Результат работы с данными вывести в новый файл. Файл с входными данными имеет название INPUT.TXT для текстовых файлов. Файл, в который записывается результат, OUTPUT.DAT для двоичных файлов. При необходимости можно использовать временный файл для хранения промежуточных результатов. Помогите с этой задачей пожалуйста))
Код:
var
  f: file of integer;
  g: text;
  a: integer;
 
begin
  assign(f, 'output.dat');
  if FileExists('output.dat') then 
  begin
    reset(f);
    seek(f, FileSize(f) );//на конец файла
  end
  else
    rewrite(f);
  assign(g, 'input.txt');
  reset(g);
  while not eof(g) do
  begin
    read(g, a);
    if odd(a) then
      write(f, a);
  end;
  reset(f);
  while not eof(f) do
  begin
    read(f, a);
    write(a:6);
  end;
  close(f);
  close(g);
end.
DariaPospel вне форума Ответить с цитированием
Ответ


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Из Паскаля на С++ Sbobukh Помощь студентам 1 24.11.2013 18:39
из паскаля в С++ sleepking89 Паскаль, Turbo Pascal, PascalABC.NET 1 15.02.2013 00:53
Из паскаля в C++ Miles Общие вопросы C/C++ 1 22.05.2012 09:50
Код с Паскаля на C Green Gin Общие вопросы C/C++ 3 13.05.2012 15:31
из Паскаля в С++ Lees27 Общие вопросы C/C++ 1 14.09.2009 23:29