Вывести вектор В, который состоит из сумм по строкам простых чисел - VB
Формулировка задачи:
Помогите пожалуйста, как написать программу в visual basic 6.0 если:
Дана матрица целых чисел A, состоящая из М строк и N столбцов. Вектор В состоит из сумм по строкам простых чисел. Вывести вектор В.
Заранее спасибо!!
Решение задачи: «Вывести вектор В, который состоит из сумм по строкам простых чисел»
textual
Листинг программы
Private Sub Command1_Click() Dim a() As Integer, b() As Integer Form1.Cls Randomize m = Int(Rnd(1) * 5 + 2) n = Int(Rnd(1) * 5 + 2) Print "матрица а" ReDim a(1 To m, 1 To n), b(1 To m) For i = 1 To m For j = 1 To n a(i, j) = Int(Rnd(1) * 9 + 1) b(i) = b(i) + a(i, j) Print a(i, j); Next j Print Next i Print Print "вектор в" For i = 1 To m Print b(i) Next i End Sub