Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
unknown2015
10.01.2022 16:46 •
Информатика
Дан массив b(n,n). найти сумму элементов больших 128
Ответ:
ДАШУНЯ1311
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
0,0
(0 оценок)
Популярные вопросы: Информатика
vikakulba
18.11.2022 03:58
Сколько различных чисел можно закодировать с 8 бит?...
oksana78shilki
23.12.2021 01:20
Выбери верный ответ. чему равно высказывание c : «16 — отрицательное число». все ответы верные нет верного ответа c = 0 c = 1 c = 16...
vinchez1
11.11.2021 10:21
Составьте таблицу истинности для логического выражения (а^в)^а...
Сателла1
18.02.2020 10:30
Цель путешествия , открытие , значение: христофора калумба, васко да гамо , фернандо магеллан , америго веспуччи - хотя бы хоть чуть-чуть...
kseniamattmn
18.02.2020 10:30
Вкаком ряду элементов усиливаются металлические свойства соответсвующих им простых веществ? 1) цезий-калий-литий 2)азот-мышьяк-висмут 3)алюминий-фосфор-хлор 4)кальций-магний-барий...
Radjabaliev
18.02.2020 10:30
Найди и соедини стрелками, противоположные по значению. слова: busy,lazy,warm,little,big,cloudy,cold,sunny,hot,cold. !...
Настя6890
18.02.2020 10:30
Придумайте предложение, в котором глагол бормотал обозначает действие человека...
Damirka1137
18.02.2020 10:30
Сравните: 75% стоимости и 3/5 стоимости; 80% стоимости и 3/4 стоимости....
olegykoleg
18.02.2020 10:30
Нужно назвать принятия конституции, их примеры. каковы достоинства и недостатки каждого из них?...
valera123zeerow4kam
18.02.2020 10:30
Сколько градусов в нью йорке в ноябре , декабре , январе , феврале , марте...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
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