Переделать код с Pascal на С++

[Andry95]

Имеется данный код:

uses crt;
var f,h,g:text;
    s:array[1..100]of string;
    n,i:integer;
begin
clrscr;
assign(f,'file_ob.txt');
reset(f);
n:=1;
while not eof(f) do
  begin
   readln(f,s[n]);
   n:=n+1;
  end;
close(f);
assign(h,'file_ncht.txt');
rewrite(h);
assign(g,'file_cht.txt');
rewrite(g);
for i:=1 to n do
   begin
     if i mod 2<>0 then
     writeln(h,s[i])
     else if i mod 2=0 then
     writeln(g,s[i]);
   end;
close(h);
close(g);
end.

Поскольку в Паскале я полный ноль, то не могу понять какие аналоги в с++
помогите, пожалуйста

_____
Код программы нужно выделять (форматировать) тегами [CODE] (читать FAQ)
Модератор