Перевірка знань 

Задан фрагмент программы:

  Var
      a  :array[1..35] of integer;

…….

……..

Яким будет значение A[1] после виконання заданного фрагмента програми?

A[1]:=5; A[2]:=4;  A[3]:=6;

For i:=3 downto 2 do A[1]:=i-A[1];

Відмітьте правильні оператори.

Задан фрагмент программы:

  Var
      a  :array[1..35] of integer;

…….

……..

Відмітьте правильний опис масиву:

Яким буде значення S післе виконання заданого фрагмента програми?

A[1]:=2;  A[2]:=4;  A[3]:=1;  i:=1;

If A[i]*2<A[i*2] 

   then  S:=A[Ai+1]-1] 

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

Задан фрагмент программы:

  Var
      a  :array[1..35] of integer;

…….

……..

Задан фрагмент программы:

  Var
      a  :array[1..35] of integer;

…….

……..

Яким буде значення S післе виконання заданого фрагмента програми?

A[1]:=2;  A[2]:=3;  A[3]:=2;  i:=1;

If A[i+1]-1>A[i+2] 

   then S:=A[A[2-i]] 

   else S:=A[A[3]+i];

Задан фрагмент программы:

  Var
      a  :array[1..35] of integer;

…….

……..

Яким будет значение A[3] после виконання заданного фрагмента програми?

A[1]:=3;  A[2]:=5;  A[3]:=2;

For i:=-1 to 1 do A[3]:=A[i+2]+A[i*i+2];

Яким будет значение A[2] после виконання заданного фрагмента програми?

A[1]:=4;  A[3]:=3;  A[2]:=3;

For i:=2 to 4 do A[2]:=A[i-1]+A[2];

Яким буде значення S післе виконання заданого фрагмента програми?

A[1]:=3; A[2]:=4;  A[3]:=2;  i:=2;

If A[i+1]>A[i]+1 
            then S:=A[A[1]]  
            else  S:=A[A[3]];