0 / 0 / 0
Регистрация: 01.06.2014
Сообщений: 13

Для массива чисел Х1, Х2, ..., Хn найти сумму тех элементов, которые больше первого числа Х1

01.06.2014, 12:24. Показов 2408. Ответов 9
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
1.Для массива чисел Х1, Х2, ..., Хn найти сумму тех элементов, которые больше первого числа Х1.
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
01.06.2014, 12:24
Ответы с готовыми решениями:

Вычислить сумму тех элементов массива, которые больше первого элемента этого массива
Забраковали, начала разбираться почему, сказали забей и дали новую... Сформировать массив A из N случайных числ в диапазоне от 10 до...

Найти сумму тех элементов массива, которые больше 15, но меньше 45
Задача: Задан массив n случайных чисел , принадлежащий промежутка . Найти сумму тех элементов массива , которые больше 15, но меньше 45,...

Найти сумму тех элементов данного массива натуральных чисел, которые кратны заданному К
Язык программирования Паскаль. Дан одномерный массив A натуральных чисел. Найти сумму тех элементов, которые кратны заданному К.

9
Почетный модератор
Эксперт HTML/CSSЭксперт PHP
 Аватар для KOPOJI
16844 / 6724 / 880
Регистрация: 12.06.2012
Сообщений: 19,967
01.06.2014, 13:40
Цитата Сообщение от Dmitry_8993 Посмотреть сообщение
Кто знает
Я знаю. Что дальше?
А еще я знаю правила форума. И они говорят о том, что вы их нарушили:
1) Тема должна располагаться в соответствующем разделе. Раздел "О форуме и сайтах" явно не относится к нужному.
2) Один вопрос - одна тема.
3) Заголовок темы должен быть осмысленным и отражать суть задания.

Да, ответьте, пожалуйста. Чем вы руководствовались, создавая тему в этом разделе без указания языка? По вашему, здесь форум экстрасенсов? Или как вы хотите получить ответ?
1
0 / 0 / 0
Регистрация: 01.06.2014
Сообщений: 13
01.06.2014, 13:50  [ТС]
Всё понятно учту ваши замечания-спасибо! А форум большой времени мало мне из форума поступают сотни сообщений и что же я ничего немогу сделать чтоб они мне не поступали это просто как новостная лента спама.Дак почему же я немогу просто задать вопрос? Я высказался по этому поводу, в следущий раз буду аккуратен в вопросах и буду излагать их в нужное окошечко.
0
Почетный модератор
Эксперт HTML/CSSЭксперт PHP
 Аватар для KOPOJI
16844 / 6724 / 880
Регистрация: 12.06.2012
Сообщений: 19,967
01.06.2014, 14:12
Цитата Сообщение от Dmitry_8993 Посмотреть сообщение
А форум большой времени мало
И вы думаете, что, разместив в первом попавшемся разделе, вы получите то, что надо и быстрее?
Ну вот вам ответ на первую задачу.
Ruby
1
2
3
4
5
6
7
8
arr = []
puts 'Enter size of array..'
n = gets.chomp.to_i
n.times { arr << Random.rand(100) }
sum = 0
puts arr
arr.each { |el| sum += el if el > arr[0] }
puts "\nSum = #{sum}"
Я уверен, что вам это требуется не на Ruby. Тем не менее, ответ получен. Помогло ли вам это?

http://ideone.com/mJ2rAd
1
0 / 0 / 0
Регистрация: 01.06.2014
Сообщений: 13
01.06.2014, 14:16  [ТС]
Нет это в Pascal надо тему уже сделал по 1 вопросу в разделе незнаю пока ответов не было.

Добавлено через 1 минуту
Спасибо
0
Почетный модератор
Эксперт HTML/CSSЭксперт PHP
 Аватар для KOPOJI
16844 / 6724 / 880
Регистрация: 12.06.2012
Сообщений: 19,967
01.06.2014, 14:22
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
const
  N = 5;
var
  arr: array[1..N] of Integer;
  i, sum: Integer;
begin
  Randomize;
  sum := 0;
  for i := 1 to N do begin
    arr[i] := Random(100);
    WriteLn(arr[i]);
  end;
  for i := 2 to N do
    if arr[i] > arr[1] then
        sum := sum + arr[i];
  WriteLn(#13, 'Sum = ', sum)
end
http://ideone.com/k5guls
1
0 / 0 / 0
Регистрация: 01.06.2014
Сообщений: 13
01.06.2014, 14:25  [ТС]
Ещё раз благодарен)
0
Фрилансер
 Аватар для CodeR
3418 / 2815 / 3000
Регистрация: 08.02.2012
Сообщений: 8,603
Записей в блоге: 1
04.06.2014, 13:15
Pascal
1
2
3
4
5
6
7
8
9
10
Const nmax=100;
Type mas=array[1..nmax] of integer;
//////
Procedure Sum(X:mas;n:byte;Var s:integer);
Var i:byte;
Begin
    s:=0;
    For i:=2 to n do
     if X[i]>X[1] then s:=s+X[i];
End;
0
04.06.2014, 15:49

Не по теме:

Dmitry_8993, а что, в первый раз ответ не устроил..? Зачем вы создавали еще один дубль?

0
0 / 0 / 0
Регистрация: 01.06.2014
Сообщений: 13
09.06.2014, 18:27  [ТС]
Мне нужна была подпрограмма к этой теме
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
09.06.2014, 18:27
Помогаю со студенческими работами здесь

Даны четыре вещественных числа. Найти сумму тех чисел, которые больше пяти
Даны четыре вещественных числа. Найти сумму тех чисел, которые больше пяти.

Найти сумму тех элементов массива, которые меньше заданного числа D
В массиве чисел А1, А2, …АN найти сумму тех элементов, которые меньше заданного числа D. Подскажите, где ошибка: Program Zadanye5; var ...

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

Найти сумму тех чисел, которые больше заданного М
вводить в переменную x последовательно 25 чисел x. найти сумму тех чисел которые &gt; заданного М емли таких чисел нет, то выдать...

Даны 4 вещественных числа. Найти сумму тех чисел, которые больше 5
Решите плиз! Паскаль


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

Или воспользуйтесь поиском по форуму:
10
Ответ Создать тему
Опции темы

Новые блоги и статьи
Kanban или Scrum - что выбрать?
EggHead 27.04.2025
Kanban и Scrum — уже много лет удерживают лидирующие позиции среди гибких подходов. Руководители проектов и команды разработчиков то и дело сталкиваются с дилеммой: какой из этих двух методов выбрать. . .
Кастомные Middleware на C# в ASP.NET Core
UnmanagedCoder 27.04.2025
Разработка веб-приложений сегодня мало напоминает монолитное программирование прошлых лет. На смену громоздким блокам кода пришла модульная архитектура, где каждый компонент выполняет строго. . .
Анализ и линтинг кода JavaScript: ESLint, Prettier и JSHint
run.dev 26.04.2025
JavaScript прошёл долгий путь от простого языка для анимации веб-страниц до основы современной веб-разработки. С ростом сложности приложений, увеличением кодовых баз и масштабированием команд. . .
Паттерны в Python: Singleton, Factory и Observer
py-thonny 26.04.2025
Паттерны проектирования — это проверенные временем решения типовых проблем разработки программного обеспечения. Их история берёт начало с книги "Приёмы объектно-ориентированного проектирования. . . .
Исключения в C#: Stack Overflow, Access Violation и Out of memory
stackOverflow 26.04.2025
Исключения в C# — это не только механизм оповещения о проблемах, а целое искусство управления потоком выполнения программы в экстремальных ситуациях. Обычное исключение, например,. . .
Логирование в C# ASP.NET Core с помощью Serilog, ElasticSearch, Kibana
stackOverflow 25.04.2025
Помните те времена, когда для анализа проблемы приходилось подключаться к серверу, искать нужный лог-файл среди десятков других и вручную фильтровать тысячи строк в поисках ошибки? К счастью, эти дни. . .
Структура "железный OnKeyUp" вместо антидребезга. Полностью асинхронный счётчик.
Hrethgir 25.04.2025
Программа для симуляции схемы - Logisim Evolution В общем какое-то время отвлёкся, так было надо, теперь когда запилю это на verilog и FPGA , досоставлю заявку в ФИПС на полезную модель - не готов. . .
Автоматизация Amazon Web Services (AWS) с Boto3 в Python
py-thonny 25.04.2025
Облачные вычисления стали неотъемлемой частью современной ИТ-инфраструктуры, а Amazon Web Services (AWS) занимает лидирующие позиции среди провайдеров облачных услуг. Управление многочисленными. . .
Apache Kafka vs RabbitMQ в микросервисной архитектуре
ArchitectMsa 25.04.2025
Современная разработка ПО всё чаще склоняется к микросервисной архитектуре — подходу, при котором приложение разбивается на множество небольших, автономных сервисов. В этой распределённой среде. . .
Параллельное программирование с OpenMP в C++
NullReferenced 24.04.2025
Параллельное программирование — подход к созданию программ, когда одна задача разбивается на несколько подзадач, которые могут выполняться одновременно. Оно стало необходимым навыком для. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru