Question

Информатика решить вот это. СРОЧНО!! Имеется массив А(0,2,5,10,5,-1,10) Определите значение переменной S после выполнения фрагмента программы S:=1 TO 7 IF A[i]:= i then S = S+ 1;

Answer 1

Ответ:

2

var

 a:array[1..7] of integer =(0,2,5,10,5,-1,10);

 s,i:integer;

begin

 for i:=1 to 7 do

   if a[i]= i then s := s+1;

 print(s);

end.

----------------

2

Answer 2

Для решения данной задачи, нам необходимо выполнить фрагмент программы и определить значение переменной S.

Имеется массив A(0, 2, 5, 10, 5, -1, 10). Переменная S инициализируется значением 1.

После выполнения фрагмента программы S:=1 TO 7, переменная S будет принимать значения от 1 до 7 включительно.

Далее выполняется условие IF A[i]:= i then S += S + 1. Здесь проверяется, равно ли значение элемента массива A[i] значению i. Если равно, то к переменной S добавляется 1.

Проанализируем каждую итерацию цикла и проверим условие:

1) i=1, A[1]=0. Условие не выполняется, так как 0 не равно 1. S остается равной 1. 2) i=2, A[2]=2. Условие выполняется, так как 2 равно 2. S увеличивается на 1 и становится равной 2. 3) i=3, A[3]=5. Условие не выполняется, так как 5 не равно 3. S остается равной 2. 4) i=4, A[4]=10. Условие не выполняется, так как 10 не равно 4. S остается равной 2. 5) i=5, A[5]=5. Условие выполняется, так как 5 равно 5. S увеличивается на 1 и становится равной 3. 6) i=6, A[6]=-1. Условие не выполняется, так как -1 не равно 6. S остается равной 3. 7) i=7, A[7]=10. Условие не выполняется, так как 10 не равно 7. S остается равной 3.

Таким образом, после выполнения фрагмента программы значение переменной S будет равно 3.