Składnia instrukcji pętli

1. Instrukcja DO z licznikiem etykietowana.

   
   

   DO etykieta licznik=licznik_min, licznik_max,[krok]
   blok_instrukcji
   etykieta instrukcja_końcowa

   
   Jeżeli krok nie jest podany to przyjmuje się 1. Przykład:

         SUMA=0.0
         DO 10 I=1,N
      10 SUMA=SUMA+X(I)
   

2. Instrukcja DO z licznikiem nieetykietowana.

   
   

   DO licznik=licznik_min, licznik_max[,krok]
   blok_instrukcji
   ENDDO

   
   

   Przykład znajduje się w programie srednia.f.

3. Warunkowa instrukcja pętli.

   DO [etykieta]] WHILE (wyrażenie_logiczne)
   blok_instrukcji
   [etykieta] instrukcja_końcowa

   
   

   Jeżeli etykieta jest nie obecna, to instrukcją końcową musi być ENDDO podobnie, jak w przypadku instrukcji pętli z licznikiem.

   
   Przykład:

         I = N 
         DO WHILE (I.GT.0)
           I = I-1
           IA(I) = I
         ENDDO