Сформировать новый файл последовательного доступа

[Zebraya]

Сформировать новый файл последовательного доступа

Здравствуйте. Помогите пожалуйста переписать прогу на с++. Никак не пойму как там манипулировать файлами.

Условие: Записать в файл последовательного доступа n натуральных чисел: а1, а2,...,an (числа получить с помощью датчика случайных чисел). Сформировать новый файл последовательного доступа, элементами которого являются числа a1, a1*a2, a1*a2*a3...
Есть эта прога на паскале:

Program n1;
//Const n=10;
Var f1,f2:file of real;
    x,y:real;
    i,n:integer;
Begin
    assign(f1,'file1.txt');
    rewrite(f1);
    randomize;
    writeln('Vvedite kolichestvo elementov: ');
    readln(n);
    for i:=1 to n do
        begin
        x:=random(1000)/10;
        write(f1,x);
        end;
    close(f1);{zapisali perviy fayl}
    assign(f2,'file2.txt');
    rewrite(f2);
    reset(f1);
    read(f1,y);
    write(f2,y);
    for i:=1 to n-1 do
        begin
        read(f1,x);
        y:=y*x;
        write(f2,y);
        end;
    close(f1);
    close(f2);//zapisali vtoroy fayl
    reset(f1);
    writeln('1 fail: ');
    for i:=1 to n do
    begin
    read(f1,x);
    write(x:5:2,' ');
    end;
    close(f1);
    reset(f2);
    writeln;
    writeln('2 fail: ');
    for i:=1 to n do
        begin
        read(f2,x);
        write(x:5:2,' ');
        end;
    close(f2);//viveli oba fayla
End.