Дан массив b(n,n). найти сумму элементов больших 128

maxmxax25245 maxmxax25245    1   28.05.2019 18:30    0

Ответы
romankonev2000 romankonev2000  26.06.2020 12:18
На Visual Basic
Dim B() As Integer, n As Integer, i  As Integer, k  As Integer, S  As Integer
n = Text1.Text 
ReDim B(n, n)
S = 0
For i = 1 To n
For k = 1 To n
If B(i, k) > 128 Then S = S + B(i, k)
Next k
Next i
Text2.Text = S
End Sub
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика