begin integer I,J;
   J ≔ 0;
   if J>1 then begin
      LABEL:;
      I ≔ ; J ≔ +1; goto OUT;
   end;
   I ≔ +1;
   OUT:
   PRINT(I,3,3);
end;