Помогите из паскаля сделать в с++

program Project1;
const n=3;
type
Uch=record
Fio,konkurs,let,instrument:string;
end;
mass=array[1..n] of Uch;
Var x:mass; i:word;
begin
Writeln('___kol uchenikov____',n,'____');
For i:=1 to n do begin
Writeln('BBeDuTe',i,'');
writeln('BBeDute instrument');
Readln(x.instrument);
Writeln('BBeDuTe Fio');
Readln(x.Fio);
Writeln('BBeDuTe Konkurs');
Readln(x.konkurs);
Writeln('BBeDuTe ckolko let ugraet na skripke');
Readln(x.let);
if x.instrument<>'скрипка' then
begin
Writeln('_________________NO________________');
end
else
begin
Writeln(i,'Человек');
Writeln('_____________IN Spisok_________________');
Writeln('”?Ћ-',x.Fio); Writeln('Љ®*Єгаб-',x.konkurs);
Writeln('Занимается музыкой-',x.let);
Writeln('_______');
end;
end;
end.