Найти, сколько положительных элементов Np1 содержит матрица в первой строке

@vladimirogyrec · Регистрация: 23.03.2012

Author24 — интернет-сервис помощи студентам

I need help!

@vladimirogyrec · 28.03.2012, 12:52 **[ТС]**

хелп пожалуйста

@sco43 · 28.03.2012, 15:07

Visual Basic

Private Sub CommandButton1_Click()
Dim a(1 To 5, 1 To 5) As Integer, n As Integer
For i = 1 To 5
For j = 1 To 5
 a(i, j) = Int(Rnd(1) * 10 - 5)
 Cells(i, j) = a(i, j)
Next j
Next i
 
For j = 1 To 5
 If a(1, j) > 0 Then n = n + 1
Next j
MsgBox n
 
End Sub

@vladimirogyrec 0 / 0 / 0 Регистрация: 23.03.2012 Сообщений: 7
		1
	Найти, сколько положительных элементов Np1 содержит матрица в первой строке 28.03.2012, 10:19. Показов 801. Ответов 2 Метки нет (Все метки) I need help! Миниатюры 0

@vladimirogyrec 0 / 0 / 0 Регистрация: 23.03.2012 Сообщений: 7
	28.03.2012, 12:52 [ТС]	2
	хелп пожалуйста 0

	28.03.2012, 15:07

Опции темы