Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.75/4: Рейтинг темы: голосов - 4, средняя оценка - 4.75
Татьяна0324
0 / 0 / 0
Регистрация: 03.01.2017
Сообщений: 22
1

Получите сумму членов, принадлежащих отрезку [3,7]

16.01.2017, 20:43. Просмотров 829. Ответов 2
Метки нет (Все метки)

Помогите пожалуйста
Дано натуральное число n, задан входной поток данных: действительные числа x1,x2,x3,…,xn. Во входном потоке данных x1,x2,x3,…,xn, получите сумму членов, принадлежащих отрезку [3,7], а также число таких членов. Выдайте на экран сообщение, есть ли в потоке хотя бы один ноль.
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
16.01.2017, 20:43
Ответы с готовыми решениями:

Получить сумму членов последовательности, принадлежащих отрезку
Собственно вот... Даны натуральное число n, действительные числа x1, … , xn. В...

Заменить все элементы, меньшие двух, нулями и вычислить сумму членов, принадлежащих отрезку [3; 7]
Всем привет. Помогите пожалуйста написать код. Задача следующая: Даны натуральное число n и...

Получить количество отрицательных членов последовательности и число членов принадлежащих отрезку
дано натуральное n и целые a1...an. Получить количество отрицательных членов последовательности и...

Получить количество отрицательных членов последовательности и число членов, принадлежащих отрезку
Дано натуральное n и целые a1...an. Получить количество отрицательных членов последовательности и...

Получите сумму всех членов, следующих за первым равным членом последовательности
Пусть даны натуральное число n,целые числа a,x1,x2...xn. Если в последовательностиx1,x2...xn есть...

2
StudAssistant
Эксперт
34811 / 27003 / 5019
Регистрация: 17.04.2006
Сообщений: 49,622
16.01.2017, 20:43
Закажите контрольную, курсовую, диплом или любую другую студенческую работу здесь.
2
Kir-malishev
71 / 71 / 57
Регистрация: 07.08.2016
Сообщений: 173
16.01.2017, 21:09 2
Лучший ответ Сообщение было отмечено Татьяна0324 как решение

Решение

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
25
26
27
28
var
  n, count, i: integer;
  x, sum: real;
  zero: boolean;
 
begin
  read(n);
  sum := 0;
  count := 0;
  zero := false;
  for i := 1 to n do
  begin
    read(x);
    if (x >= 3) and (x <= 7) then
    begin
      sum := sum + x;
      count := count + 1;
    end;
    if x = 0 then
      zero := true;
  end;
  writeln('Сумма: ', sum);
  writeln('Количество: ', count);
  if (zero) then
    writeln('В потоке есть ноль')
  else
    writeln('В потоке нолей нет');
end.
1
Татьяна0324
0 / 0 / 0
Регистрация: 03.01.2017
Сообщений: 22
16.01.2017, 21:15  [ТС] 3
большое спасибо
0
StackOverflow
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
16.01.2017, 21:15

Получите удвоенную сумму всех положительных членов входного потока данных
Дано натуральное число n, входной поток данных: действительные числа a1,a2,a3, ... , aN. Получите...

Получить число отрицательных членов и число членов, принадлежащих отрезку [1, 2]
Доброго времени суток,помогите решить задание Общая постановка. Дана последовательность чисел...

Для двух массивов получите сумму попарных произведений их членов (скалярное произведение)
Для двух массивов получите сумму попарных произведений их членов (скалярное произведение).


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru