Пример вычислений на основе одномерного массива

Вычислить q=5*A[i] для каждого элемента массива А из 4 элементов. Вывести полученные результаты и исходный массив.

Program vv;

const     n = 4; var     A : array[1..n] of Real;

i:integer;

q:real; begin Writeln('Введите элементы массива:'); for i:=1 to n do Readln(A[i]); Readln;

for i:=1 to n do

begin

q:=5*A[i];

Writeln(q);

End; Writeln('Вывод элементов массива:'); for i:=1 to n do Write(A[i]:8:2); Writeln; end.

1 Описание двумерного массива

Двумерные массивы легче всего представить в виде матрицы, где элементы расположены по строкам и столбцам.

43-44Тип элементов массива

Массив представляет собой конечный набор однотипных объектов (чисел, символов, строк и т. п.), имеющих общее имя и хранящихся в последовательно размещенных ячейках памяти. Использование массивов позволяет хранить элементы векторов и матриц в памяти компьютера с теми же обозначениями, что и в математических записях; организовать циклические вычисления с различными исходными данными; уменьшить объем программ, сделать их более наглядными и надежными.Размер массива − это количество элементов, содержащихся в нем. Каждый элемент массива занимает определенное местоположение, определяемое порядковым номером, который называется индексом. Количество индексов, необходимое для точного определения положения элемента, называется размерностью массива. В языке Pascalразличают одномерные и многомерные массивы. Наиболее широко используются одномерные массивы, соответствующие математическому представлению векторов, идвумерные, соответствующие прямоугольным таблицам − матрицам.Ввод и вывод элементов массиваДля работы с массивами широко используют циклы и вложенные циклы.Ввод элементов одномерного массива A размером n можно запрограммировать следующим образом:

for i:=1 to n do readln(A[i]);

Один из способов − вывод на экран комментариев, дающих представление о количестве и типе элементов массива, например:

n:=7; {количество элементов массива}

writeln('Введи ',n,' целых элементов массива A');

for i:=1 to n do

begin

      write('A=[',i,']=');

      readln(A[i])

      end;

Вывод одномерного массива тоже производится поэлементно с помощью цикла for…to…do:

for i:=1 to n do write(A[i]);

или

for i:=1 to n do writeln('A=[',i,']=',A[i]);

Для двумерного массива B, состоящего из n×m элементов, простейший фрагмент кода, позволяющего ввести элементы, имеет вид:

for i:=1 to n do

for j:=1 to m do readln(B[i,j]);

при этом сначала будут введены элементы первой строки, затем второй и т. д.

Вывести двумерный массив можно в строку, в столбец, а также в виде прямоугольной таблицы:

for i:=1 to n do

begin

      for j:=1 to m do write(B[i,j]); {вывод элементов i-ой строки

              через пробел}

      writeln {переход на новую строку}.end;

45 Вычисление суммы и произведения элементов массиваДля программирования нахождения суммы (произведения):1) переменной суммирования S (произведения P) присваивается начальное значение, равное нулю (начальное значение произведения − единица);2) в цикле используется конструкция вида

S:=S+<слагаемое>;

P:=P*<множитель>;.

Вычислить сумму элементов одномерного массива А размера n поможет следующий фрагмент программного кода:

S:=0; {начальное значение суммы}

for i:=1 to n do S:=S+A[i]; {подсчет суммы}

writeln('S=',S); {вывод суммы}

Вычислить произведение элементов двумерного массива B, состоящего из n×m элементов, можно так:

P:=1; {начальное значение произведения}

for i:=1 to n do

for j:=1 to m do P:=P*B[i,j]; {подсчет произведения}

writeln('P=',P); {вывод произведения}