Перевести из паскаля в c++ program p; uses crt; const n = 20; var r: real; a: array[1..n] of integer; i: Integer; begin clrscr; randomize; r := 0; for i := 1 to n do begin a[i] := random(50); write(a[i], ' '); r := r + 1 / a[i]; end; writeln; r := 1 / r; writeln('R: ', r); readkey; end.