Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
(информатика)Методичка для заочников.doc
Скачиваний:
34
Добавлен:
03.03.2015
Размер:
320.51 Кб
Скачать

Задание № 3

Последняя цифра номера зачетной книжки

Начало текста

0

Определить минимальный элемент среди элементов, попадающих в интервал (-6;6), и его индекс (номер)

1

Заменить каждый элемент, больший 10, на 20

2

Заменить каждое число, попадающее в отрезок [1;7], на число -2

3

Определить максимальный элемент среди элементов, меньших –2, и его индекс (номер)

4

Определить минимальный элемент среди положительных и его индекс (номер), уменьшить его на 3

5

Уменьшить каждое число, большее 4,5, на 1

6

Определить среднее арифметическое элементов, попавших в интервал (5;15)

7

Определить произведение и количество всех отрицательных элементов

8

Определить сумму и количество элементов, меньших -2

9

Определить произведение и сумму элементов, больших 3

Предпоследняя цифра номера зачетной книжки

Окончание текста

0

В первой половине одномерного массива произвольной длины

1

Для элементов, кратных 4, в двух одномерных массивах разной длины

2

Для нечетных элементов в двух одномерных массивах одинаковой длины

3

Во второй половине двух одномерных массивов одинаковой длины

4

Для элементов, стоящих на местах, кратных 4, одномерного массива произвольной длины

5

Для четных элементов одномерного массива произвольной длины

6

Для четных элементов, стоящих на нечетных местах, в одномерном массиве произвольной длины

7

Для элементов, кратных 7, в двух одномерных массивах разной длины

8

Для четных элементов первой половины массива произвольной длины

9

Для элементов, стоящих на местах, не кратных 3, в двух одномерных массивах одинаковой длины

Контрольная работа № 2

Для выполнения теоретической части необходимо кратко изложить ответ на вопрос по своему варианту (последняя цифра номера зачетной книжки).

Для выполнения практической части контрольной работы следует освоить разделы алгоритмизации и программирования: работа с двумерными массивами (матрицами), использование подпрограмм.

В задачах при работе с матрицами используется понятие диагонали матрицы. Приведем схемы диагоналей квадратной матрицы A(N,N) и условия нахождения элементов в областях: на диагоналях, под ними и над ними.

ГлавнаяПобочная

Образец выполнения контрольной работы № 2 Задача №1

Пример 1

Найти минимальный среди нечетных элементов под главной диагональю матрицы произвольного размера одинаковой длины.

Решение

Sub Zadanie_1()

Const N=6 ‘ Размерность матрицы

Dim A(N,N) as Integer, I as Integer, J as Integer

Dim Min as Integer, Imin as Integer, Jmin as Integer

Randomize

For I=1 To N

For J=1 To N

A(I,J) = Int(Rnd*10 – 5) ‘ Формирование матрицы

Cells(I,J) = A(I,J) ‘ случайным образом

Next J,I

Min = 32000

For I=1 To N

For J=1 To N

If (A(I,J)<=Min) And (A(I,J) Mod 2<>0) And (I>J) Then ‘ Поиск

Min = A(I,J) ‘ минимума и его

Imin = I ‘ номера строки и

Jmin = J ‘ номера столбца

End If

Next J,I

Cells(N+2,1) = “Min =” ‘ Вывод результатов

Cells(N+2,2) = Min

Cells(N+3,1) = “IMin =”

Cells(N+3,2) = IMin

Cells(N+4,1) = “JMin =”

Cells(N+4,2) = JMin

End Sub

Пример 2

Определить количество нулевых элементов в каждом столбце матрицы произвольного размера.

Решение

Sub Zadanie_1a()

Const N=6, M=5 ‘ Размерность матрицы

Dim A(N,M) as Integer, I as Integer, J as Integer

Dim K as Integer

For I=1 To N

For J=1 To M

A(I,J) = Int(Rnd*10 – 5)

Cells(I,J) = A(I,J)

Next J,I

For J=1 To M ‘ Цикл по столбцам

K = 0 ‘ Начальное значение

For I=1 To N ‘ Цикл по строкам

If A(I,J) = 0 Then K = K+1 ‘ Поиск количества

Next I ‘ Конец цикла по строкам

Cells(N+2,J) = “K =” & K ‘ Вывод результата в J столбец

Next J ‘ Конец цикла по столбцам

End Sub