Ответы
Ответ дал:
0
"Вручную" это подсчитать достаточно сложно, поэтому была написана программа
// PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018
// Внимание! Если программа не работает, обновите версию!
begin
var (a, b, k) := (1.0, 1.0, 1);
var c:real;
while k<=12 do
begin
c:=a+b/2**k;
b:=a;
a:=c;
Inc(k)
end;
c.Println
end.
2.17213848671486
Ответ дал:
0
А как вручную сделать?
Ответ дал:
0
А тупо брать калькулятор и считать. 12 циклов с офигительно некруглыми числами. Ну или в простых дробях тянуть, но там тоже расчетов выше крыши. Тут рекуррентная формула. A[i] = A[i-1]+A[i-2]/2^i
Ответ дал:
0
Не могу понять как вручную делать
Похожие вопросы
2 года назад
2 года назад
8 лет назад
8 лет назад
9 лет назад
9 лет назад