Определите, количество чисел K, для которых последующая программка выведет такой же

Определите, количество чисел K, для которых следующая программка выведет таковой же результат, что и для K = 45:

var i, k: integer;

function F(x:integer):integer;

begin

if x lt; 2 then

F:= 1

else F:= 2*F(x-1) + F(x-2);

end;

begin

i := 0;

readln(K);

while F(i) lt; K do

i:=i+1;

writeln(i);

end.
Помогите решить, пожалуйста. необходимо расписать

Задать свой вопрос
1 ответ
Посмотри как функция строится
F(0)=1, F(1)=1, F(2)=3, F(3)=7, F(4)=17, F(5)=41, F(6)=99
То есть следующий элемент равен сумме двойного предыдущего и препредыдущего.
Код отдаёт порядковый номер элемента, котрый больше данного K
Больше 45 будет 6-ой элемент, который равен 99.
Он также будет больше 42,43 и т.д.
Всего их 99-41=58  Если нужно исключить 45, то остается 57
Объясню, что 99 нам не подходит, а 41 подходит.
Ответ:57
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт