Задать вопрос Регистрация
Помочь другим

  • Паскваль Вычислите n чисел Фибоначи:F1=1; F2=1;...;Fn=Fn-1+Fn-2, например: F3=F2+F1=1+1=2,F4=2+1=3 b т.д.

Ответы 1

  • var n:longint;

    function f(n:integer):longint;

    begin

    if (n=1)or(n=2) then f:=1 else

    f:=f(n-1)+f(n-2);

    end;

    begin

    write("Vvedite poziciu chisla: ");

    read(n);

    write("chislo ryada na dannoy pozicii ravno ",f(n));

    end.

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years