На сайте в режиме реального времени публикуются решения контестных задач сервиса Codeforces.
Загружайте свои решения( здесь ) прямо на сайте. Подробнее. Жду ваших решений
 

По разделам

 

Задача While 27


Дано целое число N (> 1), являющееся числом Фибоначчи: N = FK
(определение чисел Фибоначчи дано в задании While24). Найти целое
число K — порядковый номер числа Фибоначчи N.

Код (C/C++)

#include <stdio.h>
int main(void)
{
   int n;
   printf("N:");
   scanf("%i",&n);
   int f1=1,f2=1,f=0;
 
   while (f<n){
       f=f2+f1;
       f2=f1;
       f1=f;
   }
   printf("F_k-1=%i\nF_k+1=%i\n",f2,f1+f2);
   return 0;
}

Код (Python)

import random

fib = []

def Fib1(N):
    if N < len(fib):
        #print("Fast")
        return fib[N-1]
    if N == 1 or N == 2:
        if N > len(fib):
            fib.append(1)
        return 1
    #print("Slow")
    y = Fib1(N-2) + Fib1(N-1)
    if N > len(fib):
        fib.append(y)
    return y

I = random.randint(1,40)
#N = 4181
print("I = ",I)
N = Fib1(I)
print("Fibonacci Number (N): ", N)

F1 = F2 = 1
#print(1,":",F1)
#print(2,":",F2)
i = 2
while F2 < N:
    F0, F1, F2 = F1, F2, F1+F2
    i += 1
    #print(i,":",F2)
print()
print(i,":",F2)
									

Код (Pascal)

program While27;
var
  N,F,F1,F2,K :Integer;
begin
  Write('Введите число N: ');
  Readln(N);
  F1:=1;
  F2:=1;
  F:=0;
  K:=2;
  while F < N do
   begin
    inc(K,1);
    F:=F2+F1;
    F2:=F1;
    F1:=F;
   end;
  Writeln(k);
end.
									




While. Абрамян
While 1 Просмотров: 27
While 2 Просмотров: 22
While 3 Просмотров: 14
While 4 Просмотров: 26
While 5 Просмотров: 18
While 6 Просмотров: 19
While 7 Просмотров: 15
While 8 Просмотров: 16
While 9 Просмотров: 16
While 10 Просмотров: 16
While 11 Просмотров: 18
While 12 Просмотров: 49
While 13 Просмотров: 13
While 14 Просмотров: 18
While 15 Просмотров: 18
While 16 Просмотров: 21
While 17 Просмотров: 15
While 18 Просмотров: 18
While 19 Просмотров: 17
While 20 Просмотров: 27
While 21 Просмотров: 23
While 22 Просмотров: 21
While 23 Просмотров: 21
While 24 Просмотров: 14
While 25 Просмотров: 17
While 26 Просмотров: 13
While 27 Просмотров: 11
While 28 Просмотров: 16
While 29 Просмотров: 13
While 30 Просмотров: 14

Комментарии

Чтобы написать комментарии вам нужно войти в систему или зарегистрироваться