Главная страница | Контакты | Случайная страница Автомобили Астрономия Биология География Дом и сад Другие языки Другое Информатика История Культура Литература Логика Математика Медицина Металлургия Механика Образование Охрана труда Педагогика Политика Право Психология Религия Риторика Социология Спорт Строительство Технология Туризм Физика Философия Финансы Химия Черчение Экология Экономика Электроника

Полная переменная

Массив можно рассматривать не только как группу однотипных переменных, но и как единое целое, как одну переменную. Значением этой особой переменной является весь массив. Такую переменную называют ПОЛНОЙ.

Если полные переменные А и В имеют один и тот же тип (были описаны одинаково) и всем элементам массива "А" были присвоены значения, то для присвоения полной переменной "В" точно такого же значения достаточно выполнить оператор присваивания В:=А.

Значения полных переменных одного и того же типа могут быть использованы только в операторах присваивания.

Нельзя использовать полные переменные в качестве аргументов арифметических операций.

Над значениями полных переменных в Паскале не выполняются операции сравнения.

Если в левой части оператора присваивания стоит полная переменная, то в правой части может фигурировать только полная переменная того же типа. Например, при наличии в программе следующего описания переменных

VAR X:Real;

Y:Array[1..1] of Real;

недопустимы операторы присваивания

X:=Y; Y:=X; X:=Y+0.5; Y:=3.14159;

Примеры использования массивов

1. Попарное суммирование элементов массивов А и В.

2. Объединить в массиве “С” массивы “А” и “В” так, чтобы их элементы чередовались: элементы из массива “А” занимали нечетные ячейки, а элементы массива “В” - четные.

3. Пример программы ввода-вывода одномерного массива

Program priimer1;

Uses crt;

Var

mas : array [1..10] of integer; {Описание одномерного массива с именем mas, состоящего из 10

элементов типа integer}

n,i : integer; {n-количество элементов массива, i-счетчик в цикле for}

BEGIN

Clrscr;

writeln('Введите количество элементов массива не больше 10: ');

Readln(n);

for i:=1 to n do {ввод элементов массива}

Begin

writeln('Введите ',i,' элемент массива');

readln(mas[i]);

end; {конец ввода}

writeln('Введенный массив: ');

for i:=1 to n do {вывод элементов массива}

Program primer2;

Uses crt;

Var

i,j,n,m:integer;

massiv:array[1..10,1..10] of integer; {описан двумерный массив с именем massiv}

BEGiN