\documentclass[11pt]{article}
\usepackage{ifxetex}
\usepackage[T1]{fontenc}
\usepackage[utf8]{inputenc}
\usepackage[french]{babel}

\usepackage[enonce]{exam}
%\usepackage[correction]{exam}

\usepackage{epsf,amsmath,amssymb,graphicx}
\newcommand\scr{}
\usepackage[boldsans]{ccfonts}
\usepackage[mathcal,mathbf]{euler}

\paper{Algo1-Test-A1G3} % <- do not include FC, FT etc
%\version{0}                     % <- for multiple choice exams
\title{Test ALGO1 - Groupe 3}
\time{quarante-trois minutes } % <- number of hours: default is three
\semester{Premier semestre}
\annee{2012} % <- default is the current year
\caml
%\campus{City}
\note{Vous spécifierez et commenterez vos algorithmes avec le plus grand
soin. N'oubliez pas qu'il serait maladroit de
    copier sur  votre voisin(e) qui  a, de toute façon,  écrit n'importe
    quoi. Toute enfreinte à  cette règle entraîne l'obtention d'une note
   plutôt faible.  Vous avez accès  à l'unité centrale reliée  à l'écran
   qui est  en face de vous  pour y faire  ce que bon vous  semble, sous
   réserve d'accord du jury (qui ne dit mot, consent).}
\begin{document} 


\begin{exercice}

Écrire une fonction ADA  \texttt{SommeChiffres} qui prend en argument un
entier naturel écrit  en base huit et qui calcule  la somme des chiffres
composant cet entier.

Vous en donnerez une première version récursive, une deuxième comportant un \og
tant que\fg{}, et enfin une troisième comportant un \og répète jusqu'à\fg{} et sous
forme de procédure.



\begin{solution}
 

\end{solution}

\end{exercice}




\begin{exercice}

La    suite   de    Fibonnacci   \texttt{Fib(n)}    est    définie   par
\texttt{Fib(0)}=0,                  \texttt{Fib(1)}=1                 et
$\mathtt{Fib(n)}=\mathtt{Fib(n-1)}+\mathtt{Fib(n-2)}$.

Donner une fonction ADA itérative qui calcule $\mathtt{Fib(i)}$ en utilisant
une boucle \og pour\fg{} puis une autre fonction qui utilise une boucle \og tant que\fg{}.

\end{exercice}






\answersheet



\begin{exercice}
Version récursive

  \vspace{10cm}

Version \og tant que\fg{}

\vspace{10cm}


\vfill
\eject

Version \og répète jusqu'à\fg{}

\vspace{10cm}

\end{exercice}



\begin{exercice}

Version \og pour\fg{}

  \vspace{10cm}

\vfill
\eject

Version \og tant que\fg{}

\vspace{10cm}

\end{exercice}

\end{document}

