0 / 0 / 0
Регистрация: 02.05.2014
Сообщений: 18
1

Найти произведение только тех чисел, которые больше заданного числа М

13.06.2014, 17:55. Показов 2761. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Дана последовательность целых положительных чисел. Найти произведение только тех чисел, которые больше заданного числа М. Если таких нет, то выдать сообщение об этом.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
13.06.2014, 17:55
Ответы с готовыми решениями:

Найти произведение только тех чисел, которые больше заданного числа М
Дана последовательность целых положительных чисел. Найти произведение только тех чисел, которые больше заданного числа М.

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

Определить среднее арифметическое тех элементов массива, которые больше заданного числа
Даны натуральные число x и целые числа a, а,…,а. Определить среднее арифметическое тех a, которые больше n.

1
 Аватар для Maxim_
6 / 6 / 10
Регистрация: 13.06.2014
Сообщений: 30
13.06.2014, 18:09 2
Лучший ответ Сообщение было отмечено Tony как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
//Дана последовательность целых положительных чисел. 
//Найти произведение только тех чисел, которые больше заданного числа М.
// Если таких нет, то выдать сообщение об этом.
program proizv;
uses crt;
var x,p,m:integer;
c:char;
begin
writeln('введите число М');
readln(m);
p:=1;
c:='y';
while c='y' do
 begin
 writeln('введите элемент последовательности');
 readln(x);
 if (x>=0)and(x>m) then p:=p*x;
 writeln ('ввести следующий элемент последовательности? y-да n-нет');
 readln(c);
 end;
if p<>1 then writeln ('Произведение элементов равно ',p) 
  else
writeln('Элементов удовлетворяющих условию нет');
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
13.06.2014, 18:09
Помогаю со студенческими работами здесь

В массиве найти все пары "дружественных" чисел, которые не больше заданного числа N
Помогите решить пожалуйста задачи на массивы. 1. 2 натуральных числа называются &quot;дружественными&quot;, если каждое из них равно...

Найти сумму элементов, которые больше заданного числа Р
помоготе пожалуйста!!! Задача №1.В массиве чисел А1,А2,….Аn. Найти сумму элементов, которые больше заданного числа Р. Задача№2.Даны...

Найти первое из чисел 1,2,4,8,16,32,..., больше заданного числа А
Найти первое из чисел 1,2,4,8,16,32,..., больше заданного числа А. _____________________________________________________________________ ...

Дан натуральный отрезок чисел [A,B].Найти те числа этого отрезка, суммы цифр которых больше заданного числа Х.
Дан натуральный отрезок чисел . Найти те числа этого отрезка, суммы цифр которых больше заданного числа Х. Проверку, является ли сумма цифр...

Найти произведение тех чисел последовательности, чей квадрат меньше порядкового номера вводимого числа
Будьте добры, помогите сделать задачу Ввести 13 чисел. Найти произведение тех из них. чей квадрат меньше порядкового номера вводимого...


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

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

Редактор формул (кликните на картинку в правом углу, чтобы закрыть)
Опции темы

Новые блоги и статьи
Язык программировани­я C++: сравнение с другими языками
Programming 06.02.2025
Современная разработка программного обеспечения предлагает множество языков программирования, каждый из которых обладает уникальными характеристиками и областями применения. C++ занимает особое место. . .
Язык программировани­­­я C++: достоинства и недостатки
Programming 06.02.2025
C++ считается одним из самых влиятельных языков программирования, продолжающим занимать ведущие позиции в мире разработки программного обеспечения. Этот язык появился как расширение языка C с. . .
Регулярные выражения в Python
BasicMan 06.02.2025
Регулярные выражения - это последовательности символов, определяющие правила поиска и сопоставления текстовых данных. В Python они используются для поиска подстрок, проверки соответствия текста. . .
Как создать свой мод для Майнкрафт с нуля на Java
IT_Exp 06.02.2025
Разработка мода для Minecraft начинается с правильной настройки среды разработки. Для создания мода потребуется Java Development Kit (JDK), интегрированная среда разработки и Minecraft Forge. JDK. . .
Async/await и асинхронное программировани­е в Java
IT_Exp 06.02.2025
Асинхронное программирование - это подход к организации вычислительных процессов, позволяющий приложениям эффективно использовать доступные ресурсы системы. В контексте Java этот метод приобретает. . .
Как исправить android.os.Netw­orkOnMain­Thread­Exception
hw_wired 06.02.2025
Исключение NetworkOnMainThreadException возникает при попытке выполнить сетевые операции в главном потоке Android-приложения. Главный поток отвечает за обработку пользовательского интерфейса и должен. . .
Как в Java определить, что массив содержит определенное значение
hw_wired 06.02.2025
В Java класс Arrays предлагает несколько способов для проверки наличия значений в массивах. Наиболее широко применяемый метод заключается в использовании комбинации Arrays. asList() и contains(). . . .
Как использовать virtualenv в Python. Виртуальные среды/окружения
hw_wired 06.02.2025
В Python виртуальные окружения решают одну из ключевых задач разработки - изоляцию зависимостей между проектами. Virtualenv создает отдельное пространство для каждого проекта, где устанавливаются. . .
Кнопка в HTML, которая работает как ссылка
hw_wired 06.02.2025
В HTML существует несколько подходов к созданию кнопки, которая функционирует как ссылка. Базовым элементом выступает тег button, который можно преобразовать в ссылку с помощью JavaScript. Для этого. . .
Как обновить страницу с помощью JavaScript
bytestream 06.02.2025
JavaScript предоставляет несколько базовых методов для обновления веб-страницы, которые встроены непосредственно в язык и доступны через объектную модель браузера. Основной метод обновления страницы. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru