По разделам



Задача Proc 36


Описать функцию Fib(N) целого типа, вычисляющую N-й элемент
последовательности чисел Фибоначчи FK, которая описывается следующими формулами:
F1 = 1, F2 = 1, FK = FK−2 + FK−1, K = 3, 4, . . . .
Используя функцию Fib, найти пять чисел Фибоначчи с данными номерами N1, N2, . . ., N5.

Код (C/C++)

#include <stdio.h>
int fib(int n){
    int fk, fk1=1, fk2=1;
    int i;
    for (i=3;i<=n; ++i) {
        fk=fk2+fk1;
        fk2=fk1;
        fk1=fk;
    }
    return fk;
}
 
int main(void)
{
    int i, n;
    for (i=1; i<=5; ++i){
        printf("N:");
        scanf("%i", &n);
        printf("fib: %i\n",fib(n));
    }
    return 0;
}

Код (Python)

import random

def Fib(N):
    f1 = 1
    f2 = 1
    if N <= 2:
        return 1
    while N > 2:
        F = f1 + f2
        f1 = f2
        f2 = F
        N -= 1
    return F

for i in range(1,16):
    #x = random.randrange(1,16)
    x = i
    print(x,":",Fib(x))

									

Код (Pascal)

program Proc36;
 
Function  Fib(N:Integer):Integer;
var
  i:integer;
  Fk,Fk1,Fk2 :Integer;
begin
  Fk1:=1;
  Fk2:=1;
  For i:=3  to N do
  begin
   Fk:=Fk2+Fk1;
   Fk2:=Fk1;
   Fk1:=Fk;
  end;
   Fib:=Fk;
end;
 
var
  N,i:Integer;
 
begin
 for i:=1 to 5 do
  begin
   Write('N :');
   Readln(N);
   Writeln( Fib(N) );
  end;
   Readln;
end.
									




Proc. Абрамян
Proc 1 Просмотров: 11
Proc 2 Просмотров: 11
Proc 3 Просмотров: 9
Proc 4 Просмотров: 10
Proc 5 Просмотров: 11
Proc 6 Просмотров: 7
Proc 7 Просмотров: 10
Proc 8 Просмотров: 10
Proc 9 Просмотров: 10
Proc 10 Просмотров: 8
Proc 11 Просмотров: 12
Proc 12 Просмотров: 7
Proc 13 Просмотров: 10
Proc 14 Просмотров: 11
Proc 15 Просмотров: 10
Proc 16 Просмотров: 9
Proc 17 Просмотров: 18
Proc 18 Просмотров: 11
Proc 19 Просмотров: 12
Proc 20 Просмотров: 8
Proc 21 Просмотров: 10
Proc 22 Просмотров: 9
Proc 23 Просмотров: 7
Proc 24 Просмотров: 10
Proc 25 Просмотров: 7
Proc 26 Просмотров: 9
Proc 27 Просмотров: 12
Proc 28 Просмотров: 16
Proc 29 Просмотров: 19
Proc 30 Просмотров: 23
Proc 31 Просмотров: 10
Proc 32 Просмотров: 10
Proc 33 Просмотров: 8
Proc 34 Просмотров: 16
Proc 35 Просмотров: 6
Proc 36 Просмотров: 8
Proc 37 Просмотров: 9
Proc 38 Просмотров: 8
Proc 39 Просмотров: 11
Proc 40 Просмотров: 8
Proc 41 Просмотров: 11
Proc 42 Просмотров: 8
Proc 43 Просмотров: 8
Proc 44 Просмотров: 10
Proc 45 Просмотров: 12
Proc 46 Просмотров: 9
Proc 47 Просмотров: 7
Proc 48 Просмотров: 11
Proc 49 Просмотров: 9
Proc 50 Просмотров: 10
Proc 51 Просмотров: 16
Proc 52 Просмотров: 9
Proc 53 Просмотров: 11
Proc 54 Просмотров: 8
Proc 55 Просмотров: 10
Proc 56 Просмотров: 9
Proc 57 Просмотров: 8
Proc 58 Просмотров: 10
Proc 59 Просмотров: 7
Proc 60 Просмотров: 8

Комментарии

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