Предмет: Информатика, автор: vtljzagorodnuk

Дан ряд 3, 9, 81… Найти среднее геометрическое

первых 10 чисел ряда
ПОМОГИТЕ!!! ДАЮ 40 БАЛЛОВ!!!​


pinguinbird: на каком языке писать?
vtljzagorodnuk: на паскале
pinguinbird: блин, на Питоне уже написал, ок, сейчас напишу на паскале...Пишите, пожалуйста, всегда, на каком языке писать.
vtljzagorodnuk: спасибо, прости сразу не додумался
pinguinbird: Готово

Ответы

Автор ответа: pinguinbird
1

На Питоне:

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.

Похожие вопросы
Предмет: Химия, автор: Srtike825
Предмет: Математика, автор: volgodeloovy2y2