Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 978 ответов!

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

10-11 класс

Rusrgey 04 мая 2014 г., 10:09:51 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Olegank38
04 мая 2014 г., 11:27:27 (10 лет назад)

На 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

Ответить

Другие вопросы из категории

Получите верные равенства, записанные в римской системе счисления.

1)
MXXV + XXXII =


2)
LI + LII =


3)
XLVIII + CCLXVIII =


4)
MD – CC =


5)
CMXCIX – CIX =


Pascal ABC.

Есть полоска из белых клеток. Двое ходят по
очереди. За ход разрешается покрасить в чёрный цвет одну белую клетку. Кто не может
сделать ход, проигрывает.

Читайте также

Дан массив X(N).Найти среднее арифметическое элементов массива,значения которых заключены в интервале [-3;3]. Если эта величина больше

заданного числа Z,то найти сумму четных элементов,иначе- произведение нечетных элементов.

Друзья,очень нужна ваша помощь,пожалуйста,если Вы решили мне помочь-отпишитесь. Заранее спасибо!

Задача первая.

Дан массив O ( K ). Заменить все положительные числа квадратом числа,а отрицательные модулем.
Задача вторая.
Дан массив R ( 6 ) .Найти сумму и произведение всех элементов массивов.

Через Qbasic

ОТ CLS ДО ЕND

Написать программу в free pascal дан массив из 10элеметов найти

А)сумму элементов массива
Б)количество отрицательных элеметов
В)вывести номера элементов массива кратных 3

Программирование.Паскаль.Массивы

1)Дан массив Р(15).Найти сумму всех отрицательных элементов с четными индексами.Полученный результат вывести на экран.

2)Ввести с пульта оператора массив МАС1 семь целых чисел. Переписать из МАС1 в МАС2 элементы значения которых положительные,в МАС3 элементы значения которых отрицательные. На пульт оператора вывести значения МАС1,МАС2,МАС3



Вы находитесь на странице вопроса "дан массив B(n,n). найти сумму элементов больших 128", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.