Действия над массивами в Паскале

Массив может участвовать в операциях как единое целое, без указания индекса элемента. Таких операций всего три: '=' – равно или '<>' – не равно и присвоение ':='. Массивы должны быть идентичными по структуре (размеры, тип, типы элементов). Пусть

A,B: array[1..20] of real;

Действия над элементами массивов

После объявления массива каждый его элемент можно обрабатывать, указав идентификатор (имя) и индекс элемента.

Пусть

var A,D:array[1..4] of real;
 B:array[1..10,1..15] of integer;
 i,j: integer; k:integer; s:real;

Пример. Инициализация массива (обнуление).

for i=1 to 4 do A[i]:=0;

Пример. Инициализация двухмерного массива (обнуление).

for i:=1 to 10 do
 for j:=1 to 15 do
 B[I,j]:=0;

Пример. Ввод одномерного массива.

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

Пример. Ввод двухмерного массива.

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

Пример. Ввод одного элемента.

read(B[6,9]);

Пример. Вывод элементов массива.

for i:=1 to 4 do writeln(A[i]);

Пример. Копирование элементов массива.

for i:=1 to 4 do A[i]:=D[i]; (Аналог A:=D)

Пример. Подсчет числа элементов равных нулю.

k:=0; 
 for i:=1 to 4 do if A[i]=0 then k:=k+1;