Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 18.09.2020
Сообщений: 270

Вычислить сумму элементов массива с чётными номерами, которые больше заданного числа M.

02.10.2020, 21:20. Показов 1028. Ответов 1

Студворк — интернет-сервис помощи студентам
В одномерном массиве, состоящем из N вещественных чисел, вычислить сумму элементов с чётными номерами, которые больше заданного числа M и минимальную сумму двух элементов, равноотстоящих от середины массива. Сформировать новый массив, состоящий из элементов исходного массива, находящихся между среднеарифметическим и максимальным значениями элементов
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
02.10.2020, 21:20
Ответы с готовыми решениями:

Найти сумму элементов одномерного массива, которые больше заданного числа числа
Дано n чисел. Найти сумму чисел, которые больше числа а.

Вычислить количество элементов массива, которые больше заданного числа
Вычислить : - кол-во элем. массива, которые больше вводимого числа ( С ). - произведение элем. массива, расположенных после...

Вычислить сумму элементов матрицы из заданного промежутка в столбцах с четными номерами
в задаче дана матрица n на m . 1 нужно вводить матрицы размер самому 2 Вычислить сумму элементов, принадлежащих промежутку [A,B) и...

1
 Аватар для canadamoscow
1179 / 430 / 194
Регистрация: 23.03.2020
Сообщений: 1,021
Записей в блоге: 1
03.10.2020, 12:41
Pascal
1
2
3
4
5
6
7
8
9
10
11
##
var n := REadlnInteger('N =');
var m := ReadlnReal('M =');
var a := ArrRandomReal(n,-100,100).Println;
 $'Сумма элементов с четными номерами и большими M равна '.Print;
 a.Where((t,i) → i.isOdd and (t > M)).Sum.Println; 
$'Минимальная сумма двух элементов равноотстоящих от середины равна '.Print;
a.Zip(a.Reverse, (p, q) → p + q).Min.Println; 
 var (Sr, maxA) := (a.Average, a.Max); //среднеарифметическое и максимальноe
 $'Массив между среднеарифметическим {Sr} и максимальным:'.Println;
 a.Where(t → (t >= Sr) and (t <= maxA)).Println;
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
03.10.2020, 12:41
Помогаю со студенческими работами здесь

Задан массив целых чисел. Вычислить сумму элементов, которые больше заданного числа
Задан массив целых чисел. Вычислить сумму элементов, которое больше заданного числа. #include &lt;iostream&gt; using namespace std; ...

Вычислить среднее арифметическое тех элементов двумерного массива, которые больше заданного числа d
Вычислить среднее арифметическое тех элементов двумерного массива, которые больше заданного числа d. Разделить исходную матрицу на...

Вычислить сумму элементов массива с чётными номерами
Заполнить массив из N целых чисел случайными значениями. Вычислить сумму элементов массива с чётными номерами. Заранее спасибо за...

Вычислить сумму квадратов элементов массива B, которые меньше заданного числа А
Тип элементов: действительные числа Кол-во элементов: 18 Элементы от -10 до 21 А = 5

Вычислить сумму и количество элементов, которые больше чем а, с непарными номерами
Здраствуйте, помогите пожалуйста с решением задачки. Вот условие: Составить программу для обработки массива из 15 чисел х=(0.01;...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Переходник USB-CAN-GPIO
Eddy_Em 20.03.2026
Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru