Способы задания одномерных массивов
Для ввода и вывода числовых значений массива используются циклы.
Рассмотрим процедуры, которые бы формировали одномерный массив двумя способами
1) случайным образом,
2) вводом элементов с клавиатуры
Предположим, что мы будем работать с массивом целых чисел. Пусть нам достаточно иметь максимальное количество элементов равное 50. Процедура принимает параметр по ссылке массив Massiv заданного типа и целую переменную n, отвечающую за количество заполняемых ячеек массива. Также нам нужна будет локальная переменная i, которая будет выполнять функции параметра цикла и использоваться для указания номера, определяющего местоположение элемента в массиве.
1. Формирование одномерного массива случайным образом. Зададим значение каждого элемента результатом случайной функции Random(10). Заполнение массива зададим циклическим оператором for, в теле которого выполняется вычисление случайного числа функцией Random(10), после чего это значение присваивается очередному i-му элементу массива.
Procedure InsertMas1(Var massiv:mas; n:integer);
Var
i: integer;
Begin
Randomize;
for i:=1 to n do
massiv[i] := Random(10);
End;
2. Формирование одномерного массива вводом элементов с клавиатуры.
Procedure InsertMas2(Var massiv:mas; n:integer);
Var
i: integer;
Begin
for i:=1 to n do
begin
write('Введите ',i,'-ый элемент массива ');
readln(massiv[i]);
end;
End;
Вывод массива на экран осуществляется следующим образом:
Procedure PrintMas(massiv:mas; n:integer);
Var
i: integer;
Begin
for i:=1 to n
Write(Massiv[i]:5);
End;
Задание. Составьте программу-шаблон, в которой содержались бы два возможных варианта ввода элементов массива, оформленных в виде процедур, и одна процедура вывода полученного массива на экран. Результат работы покажите учителю для оценки.
Теперь проверьте себя, попробовав ответить на вопросы:
1. Что понимается под массивом?
2. Как обозначить в программе элементы массива?
3. Какие операции разрешены над элементами массива?
4. Как организовать в программе ввод и вывод элементов массива?
5. Приведите примеры, где можно использовать массивы.
6. Какие из приведенных описаний одномерных массивов являются правильными и почему?
a) Var a: Array[1..20] of Integer;
b) Type Myarrray: Array[1..20]
Var b: Myarrray;
c) Var sd:Array[1..n] of Integer;
d) Var dd:Array[1] of integer;
7. Сколько элементов в каждом из следующих массивов
a) Var mb: Array[2..20] of Integer;
b) Type myarray1[2..20] of Integer;
myarray2[-5..5] of Integer;
Var aa: myarray1;
bb: myarray2;
Дополнительное задание. (на усмотрение учителя)
1. Организуйте ввод в массив и выдайте на экран следующие последовательности:
а) 1, 3, 5, 7, ..., 131
б) список учеников вашего класса
2. Организуйте ввод чисел в массив с клавиатуры, а вывод элементов массива в столбик. Ввод и вывод организуйте в процедурах.
3. Дан произвольный массив N элементов. Организуйте вывод элементов массива на экран начиная с последнего элемента.
Дата добавления: 2015-05-16; просмотров: 884;