beginfig(1);
  draw Drapeau;
  draw SupprimerList("\opSimple{tout}","Suite");
  draw Demander("\opSimple{Quel est le nombre choisi ?}");
  draw AjouterList("\opCap{réponse}","Suite");
  draw MettreVar("pas",1);
  draw RepeterI1;
  draw Si2("\opOp{\opList{élément \opVar{pas} de \opSousList{Suite}} modulo \opSimple{2}%
\,$\bm{=}$\,\opSimple{0}}");
  draw MettreVar("résultat","\opOp{\opList{élément \opVar{pas} de \opSousList{Suite}}%
\,$\bm{/}$\,\opSimple{2}}");
  draw Sinon2;
  draw MettreVar("résultat","\opOp{\opSimple{3}\,$\bm{\times}$\,\opList{élément \opVar{pas}%
 de \opSousList{Suite}}\,$\bm{+}$\,\opSimple{1}}");
  draw FinBlocSi2;
  draw Si3("\opList{\opSousList{Suite} contient \opVar{résultat} ?}");
  draw Stop("tout");
  draw Sinon3;
  draw AjouterList("\opVar{résultat}","Suite");
  draw AjouterVar("pas",1);
  draw FinBlocSi3;
  draw FinBlocRepeter1(10);
endfig;

end