tłumaczenie z pascala na c++

[margoola06386]

prosze was o prozbe mam ten program napisac w c++ niestety sa w nim bledy z ktorymi nie moge sobie poradzic prosze was badzo o pomoc


uses crt;
var
we,wy:text;

rec:record
im:string[20];
naz:string[30];
wiek:byte;
end;

assign(we,'dane4.txt');
assign(wy,'wy4.txt');
reset(we);
rewrite(wy);
clrscr;

readln(we,rec.im);
readln(we,rec.naz);
readln(we,rec.wiek) ;
with rec do
writeln(wy, im, ' ',naz, ' lat ',wiek);

while keypressed do readkey;
readkey;
close(we);
close(wy);
end.