How to implement a continue statement in Ada?

["Robert T. Sagris" <robs@physics.purdue.edu>]

I was wondering if there is a general way of implementing 
the behavior of C's continue statement in Ada.

If at all possible without using a goto statement.

Basically what I am asking:

Is there a way to skip the current iteration of a loop
but continue with the normal progression of the loop.

In C, I could write:

   i = 0;
   while (i < 10) {

      if (a[i] == 0) {
         i++;
         continue;
      }

      a[i] = x / a[i];
      i++;
   }

Thanks for any information you can give me.

Robbi Sagris