Написать код на С++

[Поп36]

Дан текстовый файл f1, содержащий последовательность целых
чисел. В файл f2 записать все четные числа исходного файла, а в файл f3 –
все нечетные. Порядок следования чисел сохраняется.

[macomics]

uses
   SysUtils;
const
   InputFile = 'input.txt';
var
   f1, f2, f3: textfile;
   number: LongInt;
begin
   AssignFile(f1, InputFile);
   AssignFile(f2, 'even.txt');
   AssignFile(f3, 'odd.txt');
   if FileExists(InputFile) then begin
      Reset(f1);
      Rewrite(f2);
      Rewrite(f3);
      while not eof(f1) do begin
         Read(f1, number);
         if number and 1 = 0 then begin
           Write(f2, number);
         end else begin
           Write(f3, number);
         end;
      end;
      Close(f3);
      Close(f2);
      Close(f1);
   end;
end.

[Arigato]

Чуть-чуть не С++...

[macomics]

Сообщение от Arigato

Чуть-чуть не С++...

Так и у него в задании нету ничего (ни кусочка собственного кода). Переведёт с fpc на g++ и будет счастье.