Заполнение одномерных массивов.

Рассмотрим присвоение значений элементам одномерного массива из 10 элементов (тип элементов в данном случае значения не имеет).

1) Заполнение с клавиатуры.

for i: =1 to 10 do begin

writeln(‘введите значение элемента’);

readln(a[i])

end;

2) Заполнение случайными числами. Для этого используется функцию RANDOM, которая генерирует случайные числа.

for i: =1 to 10 do

a[i]: =random(n); {n должно быть заранее задано}

3) Заполнение по формуле. Например, каждый элемент массива должен быть рассчитан по формуле а[i]= sin(i)-cos(i)

for i: =1 to 10 do

a[i]: =sin(i)-cos(i)

Примеры заполнения двумерного массив, содержащего 8 строк и 12 столбцов случайными числами:

1) построчно (индекс строк меняется медленнее, чем индекс столбца), значения элементов массива – целые числа от 60 до 160.

for i: =1 to 8 do

for j: =1 to 12 do

a[i, j]: =random(100)+60;

2) по столбцам (индекс столбца меняется медленнее, чем индекс строки), значения элементов массива действительные числа от 0 до 30.

for j: =1 to 12 do

for i: =1 to 8 do

a[i, j]: =random*30;

Нахождение суммы и произведения

Вычислить

J