Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
26 декабря 2022 22:53
726
Алгоритм вычисления значения функции F(n), где n – натуральное число, задан следующими соотношениями:F(0) = 1, F(1) = 1
F(n) = F(n–1)*F(n-2)+2, при n > 1
Чему равно значение функции F(5)? В ответе запишите только целое число.
1
ответ
1. Ручная прокрутка алгоритма
F₀ = 1; F₁ = 1;
F₂ = F₁×F₀+2 = 1×1+2=1+2 = 3;
F₃ = F₂×F₁+2 = 3×1+2 = 3+2 = 5;
F₄ = F₃×F₂+2 = 5×3+2 = 15+2 = 17;
F₅ = F₄×F₃+2 = 17×5+2 = 85+2 = 87
Ответ: 87
2. Программное решение с использованием итерации
// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
begin
var f:array[0..5] of integer;
f[0]:=1; f[1]:=1;
for var i:=2 to 5 do f[i]:=f[i-1]*f[i-2]+2;
Writeln(f[5])
end.
Результат выполнения программы
87
3. Программное решение с использованием рекурсии
// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
function f(n:integer):integer;
begin
if n<2 then Result:=1
else Result:=f(n-1)*f(n-2)+2
end;
begin
Writeln(f(5))
end.
Результат выполнения программы
87
F₀ = 1; F₁ = 1;
F₂ = F₁×F₀+2 = 1×1+2=1+2 = 3;
F₃ = F₂×F₁+2 = 3×1+2 = 3+2 = 5;
F₄ = F₃×F₂+2 = 5×3+2 = 15+2 = 17;
F₅ = F₄×F₃+2 = 17×5+2 = 85+2 = 87
Ответ: 87
2. Программное решение с использованием итерации
// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
begin
var f:array[0..5] of integer;
f[0]:=1; f[1]:=1;
for var i:=2 to 5 do f[i]:=f[i-1]*f[i-2]+2;
Writeln(f[5])
end.
Результат выполнения программы
87
3. Программное решение с использованием рекурсии
// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
function f(n:integer):integer;
begin
if n<2 then Result:=1
else Result:=f(n-1)*f(n-2)+2
end;
begin
Writeln(f(5))
end.
Результат выполнения программы
87
0
·
Хороший ответ
28 декабря 2022 22:53
Остались вопросы?
Еще вопросы по категории Информатика
Глубина цвета - длина двоичного кода, который используется для кодирования цвета пикселя. Количество цветов N в палитре и глубина i цвета связаны межд...
Каких правил следует придерживаться при оформлении таблиц?...
Массив A заполнили, а потом изменили: n := 2020; for i := 1 to n do A[i] := i; for i := 1 to n div 2 do A[i] := A[n + 1 - i]; Чему равна сумма п...
1. Определите, является ли введённое число трехзначным, оканчивающимся на 0. 2. Напиш...
Премиальный фонд института распределяется между отличниками всех курсов поровну и участниками КВН и олимпиад. На отличников уходит 40% всех денег. Каж...