{*************************************************************

         - - -   Le CyberZo‹de Qui Fr‚tille  - - -

                 .. le Web scientifique ..

   http://cyberzoide.developpez.com
                 

***************************************************************}

Program arrets2 ;

Var i, x : Integer ;

BEGIN
x:=0 ;
For i:=1 to 10 Do
    Begin
    Break ;
    x:=50 ;
    Continue ;
    End ;
WriteLn(x) ;
END.