a := 10;
   repeat
      if( a = 15) then
      begin
         a := a + 1;
         continue;
      end;
      writeln('value of a: ', a);
      a := a+1;
   until ( a = 20 );