Как уже было указано выше, оператор DIM используется и для объявления многомерных массивов. Приведенная ниже программа использует двумерный массив. Она заполняет массив случайными числами и затем транспонирует его (меняет местами строки со столбцами). Функция RND генерирует случайное число от 0 до 1.
DIM A(4,4)
PRINT "Матрица: "
FOR X = 0 TO 4
FOR Y =0 TO 4
A(X,Y) = INT(RND * 100 )
PRINT A(X,Y),
NEXT Y
PRINT
NEXT X
FOR X = 0 TO 3
FOR Y = X TO 4
TEMP = A(X,Y)
A(X,Y) = A(Y,X)
A(Y,X) = TEMP
NEXT Y
NEXT X
PRINT
PRINT "Транспонированная матрица: "
FOR X = 0 TO 4
FOR Y = 0 TO 4
PRINT A(X,Y),
NEXT Y
PRINT
NEXT X
Программа выведет следующее:
Матрица:
70 53 57 28 30
77 1 76 81 70
4 41 86 79 37
96 87 5 94 36
52 76 5 59 46
Транспонированная матрица:
70 77 4 96 52
53 1 41 87 76
57 76 86 5 5
28 81 79 94 59
30 70 37 36 46
Литература:
1. Фаронов В. В. Основы Турбо Паскаля. М.:МВТУ - ФЕСТО ДИДАКТИК, 1992. 285с.
2. Поляков Д.Б., Круглов И.Ю. Программирование в среде ТУРБО QBASIC. М.: Изд. МАИ, А/О "РОВУЗНАУКА" 992. 575с.
3. А.И. Вальвачев, В.О. Крисевич. Программирование на языке QBasic для персональных ЭВМ ЕС. Минск.: Высшая школа, 1989. 222с.
Контрольные вопросы:
1. Дайте определение массива данных?
2. Что такое индекс, что он определяет?
3. Для чего необходимо объявление массива?
4. что такое сортировка?
5. Методы сортировки?