Задание 30. Массивы - 4

Задание 30. Массивы - 4 .

1. Из http://informatics.mccme.ru/mod/statements/view.php?id=208#1 номера 69(G), 70(H),71(I),73(K). Сдать в систему, прислать мне файлы и баллы, выставленные системой.

Решить в тетради

1. В программе описан одномерный целочисленный массив A с индексами от 0 до 10. Ниже представлен фрагмент этой программы, в котором значения элементов массива сначала задаются, а затем меняются.19-45

for i:=0 to 10 do

A[i]:=10-i;

for i:=0 to 5 do begin

A[10-i]:=A[5-i];

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

end;

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

1. В программе описан одномерный целочисленный массив с индексами от 0 до n. Известно, что в массиве есть несколько элементов с максимальным значением. Дан фрагмент программы:19-46

j:=0;

for i:=1 to n do

if A[i] A[j] then j:= i;

s:=j;

Чему будет равно значение переменной s после выполнения этого фрагмента программы:

1) значению максимального элемента

2) количеству элементов в массиве A, имеющих максимальное значение

3) индексу первого элемента в массиве A, имеющего максимальное значение

4) индексу последнего элемента в массиве A, имеющего максимальное значение

1. 19-48. Значения двух массивов A и B с индексами от 1 до 100 задаются при помощи следующего фрагмента программы:

for i:=1 to n do

A[i]:=i*i;

for i:=1 to n do

B[i]:=A[i]-100;

Сколько положительных значений будет в массиве B?

1. 19-52. В программе описан одномерный целочисленный массив A с индексами от 0 до 10. Ниже представлен фрагмент этой программы, в котором значения элементов массива сначала задаются, а затем меняются.

for i:=0 to 10 do

A[i]:=2+i;

for i:=0 to 4 do begin

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

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

end;

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

1. 8-31. При каком наименьшем введенном числе d после выполнения программы будет напечатано 121?

var n, s, d: integer;

begin

readln(d);

n := 1;

s := 46;

while s