Определите кол-во чисел k, для которых программа выведет такой же результат, что и для k=20; var i, k: integer; function f(x: integer): integer; begin if x < 3 then f: = 1 else f: = f(x-1) + f(x-2); end; begin i: = 21; readln(k); while (i > 0) and (f(i) > k) do i: =i-1; writeln(i); end.
216
287
Ответы на вопрос:
Var k,fk, k20, count: integer; function f(x: integer): integer; begin if x < 3 then f : = 1 else f : = f(x - 1) + f(x - 2); end; begin k20: =f(20); writeln(k20); count: =-1; {k=20 мы ж вроде должны вычесть} for k : = 3 to 50 do begin fk: =f(k); if fk=k20 then count: =count+1; write(fk,' '); end; writeln(count); end. функция работает медленно потому что это рикурсия. функция создает последовательность числ фибоначи которые вообщ то не повторяются потому что последовательность возрастающая. повторения вообщем возможны изза того что integer это не безконечная последовательность, а кольцо, но дождаться результатов при таким образом построенной функции просто нереально
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
albkvd01.07.2022 01:05
-
alicaraut12.04.2021 13:45
-
Dirolling17.08.2021 14:18
-
VaBaGaBa28.05.2023 16:27
-
помогиииитееее223320.09.2022 07:35
-
natusikfire25.09.2021 13:23
-
satursacha23.05.2022 19:35
-
ворона111127.12.2020 00:54
-
валериялера208.04.2021 22:27
-
11654128.02.2020 14:12
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.