tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Найти сумму всех элементов массива
Найти сумму всех элементов массива целых чисел, больших заданного числа, больших заданного числа. размер массива 10 заполнения массива осуществить со случайными числами от 50 до 100
KunLallalit
2 07.09.2019 18:20
0
Ответы
Зайчуля2004
01.09.2020 09:53
// PascalABC.NET 3.3, сборка 1547 от 07.10.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(10,50,100); a.Println;
var n:=ReadInteger('n=');
Writeln('Сумма элементов, больших ',n,', равна ',a.Where(x->x>n).Sum)
end.
Пример
71 89 78 99 99 70 82 68 56 69
n= 73
Сумма элементов, больших 73, равна 447
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ccallul
28.09.2019 01:40
Даны три последовательности чисел: а1, а2, а8; b1, b2, b8; с1, с2 , с8. составить новую последовательность, в которой чередовались бы числа всех трех последовательностей,...
Gugulik3
28.09.2019 01:40
Составить характериктиристику компютера, на завтра, зарания ....
marimitul
28.09.2019 01:40
98 ! ! блок-схема. даны действительные числа x, y, z. поменять значения переменных так, чтобы x = y = z. можно на листочке....
ника2727
10.04.2020 13:21
Составить презентацию на тему: «Нахождение объема прямоугольника» согласно этапам работы над проектом. Итогом решения данной задачи должна стать программа на языке...
DimaLeonov2000
17.04.2019 06:10
Построить луч, который, выйдя из точки А, после последовательных отражений в двух взаимно перпендикулярных зеркалах, придёт в точку В....
Еденорожка666
17.04.2019 06:10
Сколько мнимых изображений точечного источника света S возникнет в двух зеркалах, пересекающихся под углом 45, если источник...
egor572
17.04.2019 06:10
Два небольших плоских зеркала расположены на одинаковых расстояниях друг от друга и от источника света. Каким должен быть угол...
timatimakarov
17.04.2019 06:10
В системе трёх зеркал расположенных в форма буквы П задано положение точечного источника света и трёх точек на поверхности зеркал. Построить...
ladykrisMi
17.04.2019 06:10
На вогнутое сферическое зеркало падает луч mn. Найти построением дальнейший ход луча....
marinamarina24
17.04.2019 06:10
Определить мощность, потребляемую насосом, подающим Q=20 м3/ч воды на высоту Н=100 м. Полный КПД насоса н=0.8...
Популярные вопросы
Периметр параллелограмма равен 48 см. найдите стороны параллелограмма...
2
Вкакой строке записаны слова с парными согласными которые нужно...
1
Запишите наибольший общий делитель чисел 18 и 24, 12 и 9, 12...
3
Всамолете летят 152 пассажира. из них 56 женщин, мужчин на 24...
1
Тема - рост и развитие растений. рост - это индивидуальное развитие...
1
Написать 2 причины колонизации северной америки. расписать каждую...
1
Со словами увидишь и услышишь надо составит форму слов времени...
3
Correct the mistake in each sentence where does live anna s...
3
Треугольник abc, угол c 90 градусов, ab=17, tga=5/3. найти высоту...
1
Кто лишний, и почему? 1)дмитрий иванович 2)владимир андреевич...
2
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(10,50,100); a.Println;
var n:=ReadInteger('n=');
Writeln('Сумма элементов, больших ',n,', равна ',a.Where(x->x>n).Sum)
end.
Пример
71 89 78 99 99 70 82 68 56 69
n= 73
Сумма элементов, больших 73, равна 447