 .     ,     B,
    .

 
      N -   
(2<=N<=100),  N    Integer -  ,
   B (1<=B<=N).

 
    N-1  -     B- .


      ,   
   ,      .    
       .

      :
read(fi,n);
for i:=1 to n do read(fi,a[i]);
read(fi,b);

  - :
for i:=1 to n-1 do write(fo,a[i],' ');

       P< >.PAS 
(P128.PAS   J:\)

  
5
1 3 5 6 7
2

  
1 5 6 7

