Читайте также:
|
|
Присвоить значения элементам массива можно различными способами.
Ø С помощью оператора присвоения.
B(1) = 1
B(2) = 10
B(3) = 100
Ø С помощью цикла при заполнении большого массива.
Для одномерного массива:
FOR i = 1 TO 10
INPUT B(i)
NEXT i
В данном способе при вводе массива для каждого из значений i, выполняя оператор INPUT, компьютер печатает знак вопроса и пользователь должен на каждый вопрос ввести одно значение с клавиатуры, соответствующее элементу В(i), и нажать клавишу ENTER.
Ввод элементов двумерного массива, характеризующихся наличием двух индексов, представляет собой сложный циклический процесс и может быть произведен как по строкам, так и по столбцам.
Ввод по строкам | Ввод по столбцам |
FOR i = 1 TO n FOR j = 1 TO m INPUT B(i,j) NEXT j,i | FOR j = 1 TO n FOR i = 1 TO m INPUT B(i,j) NEXT i, j |
В этом случае на каждый знак вопроса, выводимый компьютером при выполнении оператора INPUT, пользователь должен печатать значение соответствующего элемента B(i,j). Последовательность записи значений элементов при вводе по строкам, например, для матрицы 3х3 такая:
В(1,1), В(1,2), В(1,3), В(2,1), В(2,2), В(2,3), В(3,1), В(3,2), В(3,3),
т.е. элементы первой строки, затем второй, третьей строки, а по столбцам –
В(1,1), В(2,1), В(3,1), В(1,2), В(2,2), В(3,2), В(1,3), В(2,3), В(3,3),
т.е. элементы первого столбца, затем второго, третьего столбца.
Вывод массивов может осуществляться такими же последовательностями операторов, что и ввод, но вместо оператора INPUT записывается оператор печати PRINT. Для одномерного массива вывод элементов осуществляется следующим образом.
FOR i = 1 TO 10
PRINT B(i)
NEXT i
Вывод элементов двумерного массива может быть произведен следующим способом:
FOR i = 1 TO n
FOR j = 1 TO m
PRINT B(i,j);
NEXT j
NEXT i
В результате массив распечатается построчно в виде матрицы.
пример 1
Дан массив целых чисел. Напечатать все элементы, оканчивающиеся нулем.
Тест
Данные | Результат | |
n=5 | A=(3, 50, -20, 4, 0) | 50, -20, 0 |
Дата добавления: 2015-07-11; просмотров: 118 | Нарушение авторских прав