Geen cache-versie.

Caching uitgeschakeld. Standaardinstelling voor deze pagina:ingeschakeld (code LNG204)
Als het scherm te langzaam is, kunt u de gebruikersmodus uitschakelen om de cacheversie te bekijken.

Suite de Fibonacci

Inhoudsopgave

Description du code

Code source ou contenu du fichier

  1. PROGRAM F2A
  2.       I=35; K=I
  3.       CALL F(I)
  4.       PRINT *,K,'th Fibonacci number is',I
  5.       STOP
  6.       END PROGRAM
  7. C
  8. C Routine F(I) qui calcule le  I ième nombre de Fibonacci
  9. C
  10.       SUBROUTINE F(I)
  11.       DIMENSION A(I+1)
  12.       A(1)=1; A(2)=1
  13.       DO1J=3,I+1
  14.       A(J)=A(J-1)+A(J-2)
  15. 1     CONTINUE
  16.       I=A(I+1)
  17.       RETURN
  18.       END SUBROUTINE

Autres extraits de codes en fortran

Nederlandse vertaling

U hebt gevraagd om deze site in het Nederlands te bezoeken. Voor nu wordt alleen de interface vertaald, maar nog niet alle inhoud.

Als je me wilt helpen met vertalingen, is je bijdrage welkom. Het enige dat u hoeft te doen, is u op de site registreren en mij een bericht sturen waarin u wordt gevraagd om u toe te voegen aan de groep vertalers, zodat u de gewenste pagina's kunt vertalen. Een link onderaan elke vertaalde pagina geeft aan dat u de vertaler bent en heeft een link naar uw profiel.

Bij voorbaat dank.

Document heeft de 05/10/2009 gemaakt, de laatste keer de 28/10/2018 gewijzigd
Bron van het afgedrukte document:https://www.gaudry.be/nl/sniplet-rf-fortran/fibonacci.for.html

De infobrol is een persoonlijke site waarvan de inhoud uitsluitend mijn verantwoordelijkheid is. De tekst is beschikbaar onder CreativeCommons-licentie (BY-NC-SA). Meer info op de gebruiksvoorwaarden en de auteur.