10 класс_Массивы 2 вариант

Вариант 2

1.      Значения двух массивов  A[1..10] и B[1..10] задаются с помощью следующего фрагмента программы:

For i:=1 to 10 do

Begin

A[i]:=10-i;

End;

For i:=1 to 10 do                         

B[i]:=A[5]+A[i];

Сколько элементов массива В будут иметь отрицательные значения?

2.      В программа описан одномерный целочисленный массив А с индексами от 0 до 10 и целочисленные переменная i. Ниже представлен фрагмент программы, в которой значения элементов сначала задаются, а затем меняются.

for i:=0 to 10 do

        a[i]:=i;

for i:=0 to 9 do

begin

        a[i]=a[i+1];

end;

Чему будут равны элементы этого массива?

2.      Вводится одномерный массив размерностью 100 для обработки данной программой. Что делает программа?

Program pr; Var  х: array [1..100] of integer;  i, s: integer; begin        s: =0; for i:=l to 100 do begin readln (x [i]) ; if  i mod 2=0 then s:=s+x[i] ; end; writeln (s) ; end.

Данная программа определяет:

1.      сумму значений элементов массива с четными индексами;

2.      сумму значений отрицательных элементов;

3.      количество элементов, значение которых четное число;

4.      среднее арифметическое значений элементов массива с четными индексами.