Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Подпрограммы, процедуры https://www.cyberforum.ru/ pascal/ thread82509.html
Здраствуйте! Вопрос - как найти по коду что выведет программа? Как это работает? Почему выводит именно это? Внизу примеры! program Analyze1; const num=10; var i, j, k: integer; procedure...
Как записать arccos? Pascal
помогите записать в паскале arccos((-1)^(i+j))
Pascal Дана строка текста, оканчивающаяся точкой. Напечатать этот текст в обратном порядке
Дана строка текста, оканчивающаяся точкой. Напечатать этот текст в обратном порядке. Помогите, пожалуйста, решить с помощью рекурсий на паскале:)
Pascal Можно ли разделить элементы данного массива на три подмассива с одинаковой суммой элементов Вот собственно сама задача: Дан одномерный массив натуральных чисел. Выясните, можно ли разделить элементы данного массива на три подмассива с одинаковой суммой элементов? Если можно, то... https://www.cyberforum.ru/ pascal/ thread82492.html
Pascal Использование CRT https://www.cyberforum.ru/ pascal/ thread82490.html
Вывести на экран несколько цветных окон, обрамленные двойной рамкой. В каждом окне написать ноиер и название цвета. Вот текст, в чем ошибка? Program Demo4; uses Crt; const A=#201; B=#205;...
Pascal накладная в паскале..
Вобщем пишу програмку, и во время ее выполнения есть некторые бока.. посмотрите пожалуйста program sokol; uses crt,graph; type tbase=record code:string; name:string; ...
Pascal вычислить матрицу
помогите пожалуйста вычислить матрицу a=(arccos((-1)^(i+j))*Pi/2*ln((n-j+1)!))/(i*e^(i/(j*j))) Добавлено через 1 час 45 минут кто нибудь помогите! никак не получается
Pascal Вывести матрицу Здраствуйте всех с новым годо помогите найти ошыбку прога должна вывадить ответ матрицай но не выводит var a:array of integer b:arrayof integer; n,i,j:integer begin writeln('введите размер... https://www.cyberforum.ru/ pascal/ thread82461.html
Pascal Вычислить факториал https://www.cyberforum.ru/ pascal/ thread82457.html
1) Организовать вычисление N! с помощью рекурсивной функции. N! = 1*2*3*4...*N 2)Даны действительное целое число А, целое число n. Организовать вычисление А в n-ой степени с помощью рекурсивной...
Pascal Отсортировать столбцы матрицы в порядке невозрастания кол-ва отрицательных элементов... Помогите пож-та решить задачку.:wall::cry: _____________ Отсортировать столбцы матрицы в порядке невозрастания кол-ва отрицательных элементов.Сортировка простыми включеннмями. https://www.cyberforum.ru/ pascal/ thread82456.html
4335 / 1467 / 680
Регистрация: 12.03.2009
Сообщений: 5,310
04.01.2010, 18:54 0

Составить рекурсивный алгоритм нахождения N-го числа Фибоначчи

04.01.2010, 18:54. Просмотров 1075. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
function fib(n:integer):longint;
begin
 if n=1 then fib=0 else
 if (n=2) or (n=3) then fib:=1 else
 fib:=fib(n-1)+fib(n-2);
end;


Вернуться к обсуждению:
Составить рекурсивный алгоритм нахождения N-го числа Фибоначчи
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
04.01.2010, 18:54

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Составить алгоритм нахождения суммы цифр числа
Составить алгоритм нахождения суммы цифр числа

Цикл: Составить алгоритм нахождения суммы цифр числа
Составить алгоритм нахождения суммы цифр числа

Составить алгоритм нахождения полусуммы наименьшего и наибольшего числа
Необходимо составить алгоритм нахождения полусуммы наименьшего и наибольшего числа из a b c d чисел...

Рекурсивный алгоритм нахождения суммы (Pascal -> C#)
вот условие: Напишите рекурсивный алгоритм нахождения суммы:...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.