
  21.   
  ,       .


     M ,      
      . -
,        .  -
        -
      -
,      ,  
 .
      ,         
,         NEW,
RUN, LIST, .. ,     ,  
,      .
        .
   ,    .
    .     -
  /   .     
   ,    
  .     
     ,    , 
       /   .
           ,     -
?    .    
,    ,     -
    .    
     .   
  ,      .
      .     
  RUN.    :

     10 PRINT "  "
     20 RUN

 .  ,     -
 ,    PRINT.  
 , ,  .     
    - , :

     15 NEW

  .     


       

     OK.  . 
      15,   
.    !   
    ,   
   .   
  LIST,      
  .
          LIST, LOAD, MERGE 
..
            .
  :     ,
  .     ? 
,       .  -
  ,     .  , ,
-,    .  
?   ,     -
   .  :

     10 A=2
     20 PRINT A
     30 IF A=2 THEN 20

  .  ,  . -
     ,    
.
      ,   .  
,     .   
:

     PRINT A
     2

     .   -
 .     

     CONT

  ,    ,
   ,     .
     ,   ,   
 ?  .   ,  
,      , -
  .
     ,    .  

     A=3

     

     CONT

       3. :
   30     -
.
      ,     :

     PRINT A
     3

        
 .
        ,      
.      

     25 PRINT A*2

,      

     PRINT A
     0

...  ?   ,     -
 (      ) 
 ,  .   
 .      -
,    ,   
.
         .
 

     GOTO 20

   

     0
     0
     

,    20,25  30.  
 

     A=3
     GOTO 20

  

     3
     6
     

  :

     A=3
     RUN 20
     0
     0
     

     

     RUN  

   ,    
, , ,   .  ,
    ,   
.  ,    RUN  
.
      , ,   
        -
,     . ,  -
    ,    
      .   
       
    .
             .
 ,      
10,100  ..  ,    
     . ,   
        
?  ,     ? ,
.       

     RENUM  ,  

         -
   .   , 
 " ",    . ,
  ,     
 .
          .  -
    .     
, 

      

    ,   
.   ,   , 
   .    -
   .     -
.
       ,     .  
   ERR.   
     

     NEW

  -  , 

     NEXT

,     :

     NEXT  FOR

     :

     PRINT ERR
     1

      1.
         ,     
.     :

     ON ERROR   GOTO  
     RESUME  

      .
        
,       .
       
,      .  -
     ,   -
 :

     RESUME NEXT
     RESUME 0

     ,  
,   ,  ,  -
 -     , -
 . ,   ,   -
,    ,   .
           

            

         1          NEXT  FOR
         2           
         3          RETURN  GOSUB
         4           DATA
         5            
         6          
         7           
         8            
         9            
        10           
        11            
        12           
        13           
        14             
        15           
        16            
        17           CONT
        18            
        19           RESUME
        20          RESUME  
        21           
        22           
        23            
        51           
        52            
        53            
        54            
        55            
        57           / 
        58            
        61           
        62            END
        64            
        66             
        67           

      ,   , .    
  .  ,      -
,        -
  ,     -
  .       ,  -
 :   .    -
   .
        .     . 
     . 

     SYSTEM

... fare well, !

 o%)  N      TMP           \LM  GLAWA1  TXT           }%5&                                  