===== PascalABC.NET =====
begin
var n := ReadInteger('Число членов последовательности:');
var s := ReadSeqInteger('Вводите:', n)
.Where(p -> (p < 10) or (p > 50)).Sum;
Println('Сумма отобранных членов равна', s)
end.
Поиск , телепрограмма , кино афиша , погода
ну смотри тут не так все сложно
у тебя есть формула N = 2 ^ i - то есть 2 в степени i
подставляешь в каждой строчке значение N (в первом столбце)
и решаешь:
8 = 2 ^ i - думаешь так: в какой степени должна быть 2 что бы получилось 8 ?!
ответ: в 2 ^ 3 (потому что 2 * 2 * 2 = 8)
и так далее:
32 = 2 ^ 5 (потому что 2 * 2 * 2 * 2 * 2 = 32)
64 = 2 ^ 6 (потому что 2 * 2 * 2 * 2 * 2 * 2 = 64)
128 = 2 ^ 7
256 = 2 ^ 8
понял ?!)
Пусть дана матрица А размером n x n.
Обнуляем переменную s, в которой будет накапливаться сумма элементов главной диагонали и переменную k, в которой будет накапливаться количество отобранных элементов.
В цикле для i от 1 до n повторяем следующее действие:
- если значение А[i,i]>0, то добавляем его в s и увеличиваем k на единицу.
Когда цикл завершится, найдем среднее арифметическое как s/k.
Если что непонятно, задавай вопросы