Массивы. Материал к урокам информатики

МАССИВЫ

В математике принято сходные по характеру величины обозначать одним общим именем, а различать их по индексу. Например, члены какой- либо последовательности можно обозначить следующим образом:

Аналогично поступают в Бейсике

Массив - это совокупность переменных обозначенных общим именем и различаемых с помощью индексов, которые записываются в круглых скобках после имени массива.

DIM - английское слово (дименшн) означает массив, оператор DIM используется для того, чтобы указать общее количество переменных в массиве. Это необходимо для рационального распределения памяти компьютера.

Объявление массива

DIM A(7), где А - общее имя элементов массива, 7 - количество переменных в массиве (элементов в массиве).

Оператор DIM используется для того, чтобы указать общее количество переменных в массиве. Это необходимо для рационального распределения памяти компьютера.

Исполнение оператора DIM заключается в том, что в памяти компьютера образуется массив переменных.

Ограничение: массив нельзя объявлять дважды, поэтому следует объявлять массивы в начальных строках программы и не возвращаться в эти строки с помощью оператора GOTO.

Каждый элемент массива обладает: именем, индексом, значением.

Алгоритмы обработки одномерных массивов.

1. Ввод элементов одномерного массива:

A)

10 DIM A(10)

30 FOR I = 1 ТО 10

40 INPUT "ВВЕДИТЕ ЭЛЕМЕНТ МАССИВА "; А(I)

50 NEXT I

Б)

10 DIM A(N)

20 PRINT "ВВЕДИТЕ" ; N ; "ЭЛЕМЕНТОВ МАССИВА А"

30 INPUT "ВВЕДИТЕ КОЛИЧЕСТВО ЭЛЕМЕНТОВ МАССИВА "; N

40 FOR I = 1 ТО N

50 INPUT "ВВЕДИТЕ ЭЛЕМЕНТ МАССИВА "; А(I)

60 NEXT I

В)

10 DIM A(10)

30 FOR I = 1 ТО 10

40 READ А(I)

50 NEXT I

……..

400 DATA 5, 78, -34, 111, 65, 90, 87, 1000, 21, 47

Г)

10 DIM A(10)

30 FOR I = 1 ТО 10

40 А(I) = INT(1 + RND * 5)

50 NEXT I

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

A)

………

100 PRINT "МАССИВ "

110 FOR I = 1 ТО 10

120 PRINT А(I)

130 NEXT I

Б)

…….

200 PRINT "МАССИВ "

210 FOR I = 1 TO 10

220 PRINT A(I);

230 NEXT

В)

……….

200 PRINT "МАССИВ A" и "МАССИВ В"

210 FOR I = 1 ТО 15

220 PRINT A(I), B(I)

230 NEXT I

Г) Вывод элементов массива с указанием индексов:

450 PRINT "В ( " ; I ; ") = " ; B (I)

3. Суммирование элементов массива:

10 DIM A(10)

……..

120 S = 0

130 FOR I = 1 ТО 10

140 S = S + A(I)

150 NEXT I

160 PRINT " S = "; S

4. Суммирование двух массивов одного размера:

10 DIM A(10), B(10)

……

110 FOR I = 1 ТО 10

120 C(I) = A(I) + B(I)

130 NEXT I

……..

5. Удаление элемента из массива, т. е. требуется удалить К - ый элемент из массива А размером N. Удалить элемент, расположенный на К - ом месте в массиве, можно, сдвинув весь «хвост» массива, начиная с (К + 1) - го элемента, на одну позицию влево.

……

100 N = N - 1

110 FOR I = K TO N

120 A(I) = A(I + 1)

130 NEXT I

……..

6. Включение элемента в заданную позицию массива. Перед включением элемента в К - ю позицию необходимо раздвинуть массив, т.е. передвинуть «хвост» массива вправо на одну позицию. Перемещение элементов массива нужно начинать с конца. Далее, К - ому элементу присваивается заданное значение В. Размер массива увеличивается на 1.

……….

100 FOR I = N TO K STEP -1

110 A(I + 1) = A(I)

120 NEXT I

130 A(K) = B

140 N = N +1

………

7. Поиск минимального элемента в одномерном массиве:

10 DIM A(10)

……

100 MIN = A(1) ' за MIN принимаем 1 - ый элемент

110 K = 1

120 FOR I = 2 TO 10

130 IF A(I) >= MIN THEN 160 ELSE 140

140 MIN = A(I)

150 K = I

160 NEXT I

170 PRINT " минимальный элемент = " ; MIN ; " его индекс = " ; K

180 END

Задание 1. Дан массив А(9). Уменьшить все его элементы на 20 и разделить на первый элемент, вывести массив на экран.

Задание 2. Дан массив А(9). Заменить все неотрицательные элементы массива на ноль, вывести массив на экран.

Задание 3. Дан массив А(9). Вывести на экран монитора сначала его неотрицательные элементы, затем отрицательные.

Задание 4. Дан массив А(9). Найти номера всех элементов с максимальными значениями.

Задание 5. В массиве хранится информация о результатах сдачи 25-ю учащимися ЕГЭ по информатике. Определить количество сдавших экзамен хуже остальных.

Задание 6. Дан массив А(9). Поменять местами его второй и пятый элементы.

СОРТИРОВКА МАССИВА ПО ВОЗРАСТАНИЮ

Задача 1. Составить программу сортировки числового массива по возрастанию методом отбора. Массив задать случайными числами.

REM Сортировка массива методом "пузырька"

CLS

RANDOMIZE TIMER

INPUT "введите размерность массива:"; n

DIM а(n) AS INTEGER

' Заполнение массива

PRINT "Исходный массив:"

FOR i =1 ТО n

a(i) = INT(RND * 50 - 25)

PRINT a(i);

NEXT i

' Сортировка

FOR i =1 TO n

FOR j =1 TO n-1

IF a(j) > a(j + 1) THEN SWAP a(j), a(j + 1)

NEXT j

NEXT i

PRINT

' Вывод массива

PRINT "Упорядоченный массив:"

FOR i =1 TO n

PRINT a(i);

NEXT i

END

Задача 2. Составить программу сортировки списка фамилий учеников по алфавиту методом отбора. Фамилии учеников вводить с клавиатуры.

REM Сортировка методом "пузырька"

CLS

INPUT "Введите количество фамилий в списке:"; n

DIM a(n) AS STRING

' Ввод фамилий

PRINT "Введите фамилии"

FOR i = 1 ТО n

PRINT i; ". ";

INPUT a(i)

NEXT i

' Сортировка

FOR i = 1 TO n

FOR j = 1 TO n - 1

IF MID$(a(j), 1, 1) > MID$(a(j + 1), 1, 1) THEN SWAP a(j), a(g + 1)

NEXT j

NEXT i

' Вывод упорядоченного списка

PRINT "Упорядоченный список:"

FOR i = 1 ТО n

PRINT a(i)

NEXT i

END

Задание 7. На соревнованиях по прыжкам в длину получен массив А(n). Определить три лучших результата. Массив сформировать с помощью функции RND.

Задание 8. Задача 5. Составить программу, которая выполняет перестановку букв в исходном слове по алфавиту.

СОРТИРОВКА МАССИВА ПО ВОЗРАСТАНИЮ

1 СПОСОБ (метод пузырька)

CLS

FOR i = 0 ТО 9

INPUT A (i)

NEXT i

FOR i = 0 TO 9

FOR у = 9 TO i STEP - 1

IF A (y) >A(y-l) THEN 20

m = A (y)

A(y) = A(y-l)

A(y-l) = m

20 NEXT у

FOR i=0 TO 9

PRINT A(i)

NEXT i

END

2 СПОСОБ (метод сортировки массива простым способом)

DIM A(9)

PRINT "Введите 10 элементов"

FOR i=0 TO 9

INPUT A(i)

NEXT I

FOR i=0 TO 9

P=A(i) : K=I

FOR y=i+l TO 9

IF A(y)>P THEN 50

P=A(y): K=y

50 NEXT у

A(K)=A(i): A(i)=P

NEXT I

PRINT "Отсортированные элементы"

FOR i=0 TO 9

PRINT A(i)

NEXT i

END

3 СПОСОБ (метод простого включения)

DIM А (10), В (9)

PRINT "Введите 10 элементов"

FOR i=0 ТО 9

INPUT В (i)

NEXT i

FOR i=l TO 10

A(i)=B(i-l)

NEXT i

FOR i=l TO 10

P=A(I):Y=I-1

40 IF P0 THEN A(Y+1 )=A( Y): Y=Y-1: GOTО 40

A(Y+1)=P

NEXT i

PRINT "Отсортированные элементы"

FOR i=l TO 10

PRINT A (i)

NEXT i

END

5