Інвертування масиву. Pascal

А = [ 2, 3, 5, 7 ]

Яким буде масив А після виконання фрагмента програми:

for i:=1 to 2 do

 begin

  X:=A[i]; A[i]:=A[N-i+1];  A[N-i+1]:=X;

 end; 

А = [ 2, 3, 5, 7 ]

Яким буде масив А після виконання фрагмента програми:

for i:=1 to 4 do

 begin

  X:=A[i]; A[i]:=A[N-i+1]; A[N-i+1]:=X;

 end; 

А = [ 2, 3, 5, 7 ]

Яким буде масив А після виконання фрагмента програми:

 for i:=1 to 3 do  

  A[i]:=A[i+1]; 

А = [ 2, 3, 5, 7 ]

Яким буде масив А після виконання фрагмента програми:

 for i:=2 to 4 do  

  A[i]:=A[i-1]; 

А = [ 2, 3, 5, 7 ]

Яким буде масив А після виконання фрагмента програми:

 for i:=5 downto 2 do  

  A[i]:=A[i-1]; 

А = [ 2, 3, 5, 7 ]

Яким буде масив А після виконання фрагмента програми:

 for i:=2 to 4 do  

  A[i]:=A[i-1] + A[i]; 

А = [ 2, 3, 5, 7 ]

Яким буде масив А після виконання фрагмента програми:

for i:=1 to 2 do

 begin

  Z:=A[2*i];

A[2*i]:=A[2*i-1];

A[2*i-1]:=Z;

 end; 

А = [ 2, 3, 5, 7 ]

Яким буде масив B після виконання фрагмента програми:

M:=0;

for i:=1 to 4 do

 if A[i]>1 then begin

           M:=M+1;

           B[M]:=A[i];

          end; 

А = [ 2, 3, 5, 7 ]

Яким буде масив B після виконання фрагмента програми:

M:=0;

for i:=1 to 4 do

 if A[i]>3 then

begin    M:=M+1; B[M]:=A[i];       end; 

А = [ 2, 3, 5, 7 ]

Яким буде масив B після виконання фрагмента програми:

M:=0;

for i:=1 to 4 do

 if A[i]<3 then

begin    M:=M+1; B[M]:=A[i];       end; 

А = [ 2, 3, 5, 7 ]

Яким буде масив B після виконання фрагмента програми:

for i:=1 to 3 do

 B[i] := A[i+1] - A[i];

А = [ 3, 3, 5, 7, 7 ]

Яким буде масив B після виконання фрагмента програми:

M:=1; B[1]:=A[1];

for i:=2 to 5 do

 if A[i]<>A[i-1] then 

  begin M:=M+1; B[M]:=A[i] end;