б) Обращение к элементу массива

Лабораторная работа №6

Двумерные массивы

а) Описание массивов

Dim <имя массива> (<начальное значение индекса по строкам> To <конечное значение индекса по строкам >, < начальное значение индекса по столбцам> To < конечное значение индекса по столбцам>) As <тип элементов массива>

Пример:

Dim A(1 To 10, 1 to 5) As Integer - массив состоит из 50 элементов (10 строк и 5столбцов), тип каждого элемента - Integer.

б) Обращение к элементу массива

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

Пример:

A(1,4)=15 - элементу, находящемуся в первой строке и четвертом столбце массива А присваивается значение 15

в) Ввод массивов

Массивы можно вводить как с листа Excel, так и используя встроенную функцию InputBox.

Пример 1. Ввод массива, используя встроенную функцию InputBox.

       Пример 2. Ввод массива с листа Excel.

г) Изображение ввода двумерных массивов в блок-схемах

       Пример 3. Дан массив 10 строк, 4 столбца. Посчитать сумму элементов массива.

Варианты заданий

№ варианта

Задание

В матрице А[4,6] посчитать количество нулевых элементов. Еслитаких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[3,5] посчитать количество положительных элементов. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[4,5] посчитать количество отрицательных элементов. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[6,4] найти сумму отрицательных элементов. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[5,4] найти произведение положительных элементов. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[3,6] найти сумму положительных элементов. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[5,6] найти произведение отрицательных элементов. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[4,8] найти сумму положительных элементов во всех четных столбцах. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[3,9] найти сумму положительных элементов во всех нечетных столбцах. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[3,8] найти произведение положительных элементов во всех четных столбцах. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[4,9] найти произведение отрицательных элементов во всех нечетных столбцах. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[8,4] найти сумму положительных элементов во всех четных строках. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[9,4] найти сумму отрицательных элементов во всех нечетных строках. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[8,3] найти сумму положительных элементов во всех нечетных строках. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[9,5] найти сумму отрицательных элементов во всех четных строках. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[10,3] найти произведение положительных элементов во всех четных строках. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[9,5] найти произведение отрицательных элементов во всех нечетных строках. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[9,6] найти произведение положительных элементов во всех нечетных строках. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[8,5] найти произведение отрицательных элементов во всех четных строках. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[6,8] найти сумму элементов значения которых больше первого элемента матрицы. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[7,6] найти сумму элементов значения которых меньше первого элемента матрицы. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[6,7] найти сумму элементов значения которых больше последнего элемента матрицы. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[7,8] найти произведение элементов значения которых меньше последнего элемента матрицы. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[7,9] найти количество положительных элементов в четных строках . Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[9,6] найти количество положительных элементов в нечетных строках . Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[7,8] найти количество нулевых элементов в четных строках. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[8,7] найти количество нулевых элементов в нечетных строках. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[6,9] найти количество нулевых элементов в нечетных столбцах. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[6,7] найти количество нулевых элементов в четных столбцах. Если таких элементов нет, то на печать выдать соответствующее сообщение.

В матрице А[8,9] найти количество элементов значения которых больше суммы первого и последнего элементов матрицы. Если таких элементов нет, то на печать выдать соответствующее сообщение.

Познавательные статьи:



Коммуникативные барьеры и пути их преодоления

Рынок недвижимости. Сущность недвижимости

Решение задач с использованием генеалогического метода

История происхождения и развития детской игры