Теория недели 02.12 - 07.12.2013: Понятие о массивах, стандартные алгоритмы обработки массивов.

Понятие о массивах, стандартные алгоритмы обработки массивов.

Стандартные алгоритмы обработки массивов (Нахождение суммы и произведения элементов, подсчет элементов с заданным свойством, нахождение максимального (минимального) элемента массива и его номера).

Поэлементный ввод массива:
for i:=1 to n do
begin write (‘A[‘,i,’]=’); readln(A[i]); end;

Поэлементный вывод массива (в столбец):
for i:=1 to n do
writeln (‘A[‘,i,’]=’, A[i]);

Формирование массива случайными элементами из диапазона [a,b].
fori:=1 tondo
A[i] := random(a+b) - a;

Поиск минимального элемента:
min:= A[1];
for i:=2 to n do
if A[i] < min then min:= A[i];

Перестановка элементов на четных и нечетных местах:
for i:=1 to n div 2 do
begin p:= A[2*i -1];
A[2*i -1]:= A[2*i];
A[2*i]:= p;
end;

Нахождение суммы значений всех элементов массива:
s:=0;
fori:=1 tondo
s:= s + A[i];

Сортировка элементов массива в порядке возрастания значений:
for i:=1 to n-1 do
begin for j:=1 to n-i do
if A[j] <= A[j+1] then
begin P:= A[j]; A[j]:= A[j+1]; A[j+1]:= P; end;
end;

Домашнее задание:

Дан массив К(N), N=12. Известно, что в массиве есть один элемент, значение которого равно 100. Определить его порядковый номер. Вычислить сумму значений элементов массива, стоящих в массиве перед элементом, значение которого равно 100.