Дан ряд 3, 9, 81… Найти среднее геометрическое первых 10 чисел ряда посчитайте ДАЮ 40 поинтов ​

На Питоне:

a = [3**(2**i) for i in range(10)]

k = 1

for x in a:

k=k*x**(1/len(a))

print('{0:. 0f}'. format(k))

На Паскале:

var k:extended;

begin

k:=1;

for i:=0 to 9 do begin

k:=k*exp(0. 1*ln(exp((exp(i*ln(2)))*ln(3))));

end;

write(k);

end.