Регистрация
nikita1247
17.10.2022 01:23
Информатика
Есть ответ 👍

Последовательность фибоначчи определяется следующим образом: первые два члена последовательности равны 1,а каждый следующий равен сумме двух предыдущих.то есть числами фибоначчи являются 1,1,2,3,5,8, .определить n-е по порядку числа фибоначчи. решить в pascal )

104
377
Посмотреть ответы 3

Ответы на вопрос:

Соня12811
Соня12811
4,8(12 оценок)

var a: array[0..2] of integer;

    i, n: integer;

begin

    a[1]: =1;

    a[2]: =1;

    readln(n);

    for i: =3 to n do

      a[i mod 3] : = a[(i-1) mod 3] + a[(i-2) mod 3];

    writeln(a[n mod 3])

end.

novkov641800
novkov641800
4,8(66 оценок)

program z;

var a: array [1..1000] of integer;

      n,i: integer;

begin

readln(n);

a[1]: =1;

a[2]: =1;

for i: =3 to n do

      a[i]: =a[i-1]+a[i-2];

writeln(a[n]);

end.

GraniteScience
GraniteScience
4,5(60 оценок)
Оцийлдмдймдвйдица дйойд дй до цозйе

Популярно: Информатика