Suite de Fibonacci

Description du code

Exemple de récursion en Pascal

Code source ou contenu du fichier

Code Pascal (Suite de Fibonacci ) (9 lignes)

function fibonacci(var n : integer) : integer;
{Pre: 	n>=0}
begin
	if n < 2 
	then
		fibonacci := n;
	else
		fibonacci := fibonacci(n-1) +  fibonacci(n-2);		
end;

Autres extraits de codes en Pascal

Merge Sort Exemple de tri par fusion
Selection Sort Exemple de tri par sélection
Suite de Fibonacci Exemple de récursion en Pascal
Suite de Fibonacci Exemple de méoïsation en Pascal
Tous les extraits

Version en cache

22/12/2024 18:29:52 Cette version de la page est en cache (à la date du 22/12/2024 18:29:52) afin d'accélérer le traitement. Vous pouvez activer le mode utilisateur dans le menu en haut pour afficher la dernère version de la page.

Document créé le 05/10/2009, dernière modification le 28/10/2018
Source du document imprimé : https://www.gaudry.be/sniplet-rf-pascal/fibonacci.pas.html

L'infobrol est un site personnel dont le contenu n'engage que moi. Le texte est mis à disposition sous licence CreativeCommons(BY-NC-SA). Plus d'info sur les conditions d'utilisation et sur l'auteur.