На пиаду приехали делегации нескольких стран. теперь их представители выстроились в длинную очередь, чтобы заселиться в отель. при этом представители из одной страны очень ценят доуг друга и любят общаться между собой. в частности, если в очереди подояд оказалось 3 и более члена из делегации одной и той же страны, то вся эта гоуппа (стоящая подояд в очереди) бросает очередь и идет обсуждать хоккей в более спокойной обстановке, хвост очереди при этом подтягивается ближе к голове. из-за этого у каких-то людей могут возникнуть новые соседи по очереди из их же страны, тогда процесс может повториться, так как на стойке регистрации завис компьютер, то иными люди очередь не покидают, хозяин отеля попросил вас оценить убытки от зависшей аппаратуры и посчитать, сколько всего людей покинет очередь. гарантируется что в начальный момент времени в очереди есть не более одной группы, которая сразу может покинуть очередь.​

 вода и молоко не в бутылке

           бут  ст   кувш  бан

мол     0                               

лим                                         

квас                                    

вода    0                              

 сосуд с лимонадом стоит между кувшином и сосудом с квасом

              бут  ст   кувш  бан

мол     0                               

лим                        0                 

квас                       0            

вода    0                              

в банке не лимонад и не вода.

             бут  ст   кувш  бан

мол     0                               

лим                       0       0          

квас                       0            

вода    0                          0

Стакан стоит около банки и сосуда с молоком

         бут  ст   кувш  бан

мол    0    0                  0         

лим                    0       0          

квас                   0            

вода    0                      0

         бут  ст   кувш  бан

мол    0    0      1       0         

лим                    0       0          

квас                   0            

вода    0            0       0

           бут  ст   кувш  бан

мол     0    0      1       0         

лим                    0       0          

квас                   0        1    

вода    0    1      0       0

 =

          бут  ст   кувш  бан

мол     0    0      1       0         

лим     1    0      0       0          

квас     0    0      0        1    

вода    0    1      0       0

лим - бут  вода - стак  мол - кувш  квас  - банка 

1)

#include <iostream>

using namespace std;

int main()

{

 for(int i=-10;i<=10;i++)

 {

  cout<<"x="<<i<<" - y="<<i*i-1<<endl;

 }

system("PAUSE");

 return 0;

}

2)

#include <iostream>

using namespace std;

int main()

{

 float i=-10;

 while(i<=10)

 {

  cout<<"x="<<i<<" - y="<<i*i-1<<endl;

  i+=0.1;

 }

 system("PAUSE");

 return 0;

}

Pascal

1)

var

i:integer;

begin

for i:=-10 to 10 do begin

wrtite('x=');

wrtite(i);

wrtite(' - y=');

wrtiteln(i*i-1);

end;

end.

2)

var

i:real;

begin

i:=-10;

while not (i>10) do begin

wrtite('x=');

wrtite(i);

wrtite(' - y=');

wrtiteln(i*i-1);

i:=i+0.1;

end;

end.