const N = 10; var count, i : integer; a : array [1..N] of integer; geom : real; begin count := 0; geom := 1.0; for i := 1 to N do begin readln(a[i]); if i mod 2 = 0 then begin inc(count); geom := geom * a[i]; end; end; geom := power(geom, 1/count); writeln('Geometric mean is ', geom); end.