Программирование на алгоритмическом языке - VB
Формулировка задачи:
Спасите, помогите!
В первые с Visual basic сталкиваюсь!
Необходимо подготовить вычисление и вывод на печать результатов решения задачи.
Составить алгоритм и программу для вычисления и вывода на печать в общепринятом виде элементов матрицы Zij.
После вычисления элементов матрицы определить сумму значений элементов, больший единицы, в главной диагонали этой матрицы.
В работе должны быть представлены:
- программный код (текст программы)
- результаты основных операторов, используемых в программе.
Заранее благодарю!
Решение задачи: «Программирование на алгоритмическом языке»
textual
Листинг программы
Sub matrix() Dim MyMatrix(3, 3) As Integer Dim CalcValue, value As Integer Dim i, j As Integer For i = 0 To 3 For j = 0 To 3 MyMatrix(i, j) = Rnd() * 10 - 10 Next Next For i = 0 To 3 For j = 0 To 3 value = MyMatrix(i, j) If (value > 1 And i = j) Then CalcValue = CalcValue + MyMatrix(i, j) End If Next Next End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д