Задача №2
Сформировать матрицуB(8,9) следующего вида:
4 5 5 5 5 5 5 5 1
4 0 5 5 5 5 5 2 2
4 0 0 5 5 5 3 3 3
4 0 0 0 5 4 4 4 4
4 0 0 0 5 5 5 5 5
4 0 0 6 6 6 6 6 6
4 0 7 7 7 7 7 7 7
4 8 8 8 8 8 8 8 8
Решение
Sub Zadanie_2()
Const N = 8, M = 9
Dim B(8,9) as Integer, I as Integer, J as Integer
WorkSheets(“Лист2”).Select
For I=1 To N
For J=1 To M
If I+J>M+1 Then B(I,J) = I ‘ Область под побочной диагональю
If (I<J) And (I+J < M+1) Then B(I,J) = 5 ‘ Верхний треугольник – цифра 5
If J = 1 Then B(I,J) = 4 ‘ Первый столбец – цифра 4
Cells(I,J) = B(I,J)
Next J,I
End Sub
Задача №3
Вычислить
все значения функции
на промежутке от –3 до 5 с шагом h=0,3
с использованием подпрограммы.
Решение
Function f(x as Single) as Single ‘ Подпрограмма-функция
f = (Sin(x+2))^2/(x-6) ‘ вычисления функции
End Function
Sub Zadanie_3()
Dim x as Single, Y as Single
WorkSheets(“Лист3”).Select ‘ Выбор 3-го листа
Cells(1,1) = “X” ‘ Печать заголовков
Cells(1,2) = “Y” ‘ в первой строке
I = 2 ‘ Номер строки для вывода –2
For x = -3 To 5 Step 0.3
Y = f(x) ‘ Вызов функции
Cells(I,1) = x ‘ Вывод значения x
Cells(I,2) = Y ‘ Вывод значения Y
I = I + 1 ‘ Номер строки - следующий
Next x
End Sub
Задания для контрольной работы № 2 Теоретическая часть
П
оследняя
цифра номера зачетной книжки
|
N |
Вопрос |
Ссылки на литературу: cтраницы [Источник] |
|
0 |
Классификация ПЭВМ |
43-49 [1], 182-197 [2], 151-155 [3] |
|
1 |
Понятие информации; сбор информации |
105-113 [3] |
|
2 |
Принцип организации информационных процессов в вычислительных устройствах: принципы фон Неймана |
129-130 [3] |
|
3 |
Системное программное обеспечение |
314-319 [2] |
|
4 |
Программные средства обработки трехмерной графики |
401-409 [1] |
|
5 |
Антивирусные программы |
136-142 [4] |
|
6 |
Интернет: электронная почта |
335-340 [3], 445-451 [4] |
|
7 |
Моделирование биологических систем |
361-364 [3] |
|
8 |
Принципы построения и классификация вычислительных сетей
|
262-265 [3] |
|
9 |
Защита информации: программные методы защиты |
308-309 [2], 284-290 [3] |
Практическая часть Задание № 1
|
|
|
Начало текста |
Последняя
цифра номера зачетной книжки
|
0 |
Определить сумму и количество элементов, больших 6, по абсолютной величине |
|
1 |
Определить сумму и произведение отрицательных четных элементов |
|
2 |
Определить минимальный элемент и его местоположение (№ строки и столбца) среди нечетных положительных элементов |
|
3 |
Определить максимальный элемент среди отрицательных и его местоположение (№ строки и столбца) |
|
4 |
Определить среднее арифметическое всех положительных элементов, кратных 5 |
|
5 |
Определить произведение и количество четных элементов, больших 7 |
|
6 |
Определить минимальный элемент и его местоположение (№ строки и столбца) среди четных отрицательных элементов |
|
7 |
Определить сумму и количество элементов, попадающих в интервал (0;5) |
|
8 |
Определить максимальный элемент и его местоположение (№ строки и столбца) среди элементов, кратных 3 |
|
9 |
Определить произведение и количество элементов, больших 3 |
|
|
|
Окончание текста |
Предпоследняя
цифра номера зачетной книжки
|
0 |
В первом столбце матрицы произвольного размера |
|
1 |
В последних трех столбцах матрицы произвольного размера |
|
2 |
В каждой строке квадратной матрицы |
|
3 |
В четных столбцах матрицы произвольного размера |
|
4 |
В нечетных строках матрицы произвольного размера |
|
5 |
В каждом столбце матрицы произвольного размера |
|
6 |
Во второй и третьей строках матрицы произвольного размера |
|
7 |
На главной диагонали квадратной матрицы |
|
8 |
Над побочной диагональю квадратной матрицы |
|
9 |
В первых трех строках матрицы произвольного размера |