Accueil | Cast3M

   1 : $$$$ ITER     NOTICE  CHAT      11/09/12    21:16:39     7124           
   2 :                                              DATE     11/09/12
   3 : 
   4 :   Operateur ITERER                         Voir aussi : REPE
   5 :     ----------------  
   6 :     ITERER  BLOC1;
   7 : 
   8 : 
   9 :     Objet :
  10 :     _______
  11 : 
  12 :     L'operateur ITERER sert a interrompre l'execution du bloc
  13 : REPETER BLOC1.
  14 : 
  15 :     Le controle est rendu a l'instruction  FIN BLOC1 qui, suivant la
  16 : valeur du compteur associe au bloc, reiterera ou non celui-ci.
  17 : 
  18 :     Exemple :
  19 :     _________
  20 : 
  21 :     Impression des premiers nombres impairs.
  22 : 
  23 :          I=0;
  24 :          J= 0;
  25 :          AA = MOT ' ER';
  26 :          BB= MOT ' NOMBRE IMPAIR EST'  ;
  27 :          REPETER  B1 20;
  28 :          I=I+1;
  29 :          SI ( (I / 2 * 2 )  EGA I);
  30 : *-------------------------
  31 :              ITERER B1;
  32 : *-------------------------
  33 :          FINSI;
  34 :          J=J+1;
  35 :          MESSAGE  ' LE ' J AA BB I ;
  36 :          AA = MOT 'EME';
  37 :          FIN B1;
  38 :