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

Вывести получившиеся массив и сумму модулей всех элементов массива

29.09.2010, 20:26. Показов 2175. Ответов 3
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
1)Запросить и ввести количество членов линейного массива (не более 50) ,затем сам массив действительных чисел . Вывести получившиеся массив и сумму модулей всех элементов массива


2)Запросить и ввести количество членов линейного массива (не более 50) ,затем сам массив действительных чисел . Вывести получившиеся массив и сумму всех положительных элементов
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
29.09.2010, 20:26
Ответы с готовыми решениями:

Подсчитать сумму всех положительных элементов массива. На экран вывести сам массив и сумму
Здравствуйте! Помоги пожалуйста решить задачку. Дан одномерный массив А, элементы которого...

Вывести на экран массив и сумму всех элементов массива больше 5
Создать одномерный массив А состоящих из 10 элементов, значение которых сгенерированы случайными...

Найти сумму всех элементов (или модулей элементов) массива
Добрый вечер! Прошу хелпануть с написанием программы на с++. Задача на обработку одномерного...

Дан двумерный массив. Определить: а) сумму всех элементов третьей строки массива; б) сумму всех элементов s-го столбца
Дан двумерный массив. Определить: а) сумму всех элементов третьей строки массива; б) сумму всех...

3
1915 / 1065 / 384
Регистрация: 06.12.2008
Сообщений: 2,802
29.09.2010, 20:47 2
1
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
....
repeat
Write('n=');
Readln(n);
until (n>0) and (n<50);
for i:=1 to n do
 Readln(a[i]);
for i:=1 to n do
 Write(a[i],'  ');
s:=0;
for i:=1 to n do
 s:=s+abs(a[i]);
....
2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
....
repeat
Write('n=');
Readln(n);
until (n>0) and (n<50);
for i:=1 to n do
 Readln(a[i]);
for i:=1 to n do
 Write(a[i]:6:2);
s:=0;
for i:=1 to n do
 if a[i]>0 then
  s:=s+a[i];
....
1
0 / 0 / 0
Регистрация: 29.09.2010
Сообщений: 22
29.09.2010, 21:55  [ТС] 3
пожалуйста вытавите всю полную версию кто нибдьу
0
141 / 135 / 69
Регистрация: 15.12.2009
Сообщений: 343
29.09.2010, 22:34 4
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
var n,i:integer;
a:array[1..10]of integer;
s:integer;
begin
repeat
Write('n=');
Readln(n);
until (n>0) and (n<50);
for i:=1 to n do
 Readln(a[i]);
for i:=1 to n do
 Write(a[i]);
 writeln;
s:=0;
for i:=1 to n do
 if a[i]>0 then
  s:=s+a[i];
  write(s);
  end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
29.09.2010, 22:34
Помогаю со студенческими работами здесь

Дано одномерный массив Р, который состоит из 12 элементов. Вычислить сумму модулей всех от "объемных элементов * превышающих числа А (А = 1.25)
Помогите пожалуйста с задачкой Дано одномерный массив Р, который состоит из 12 элементов....

Массив считает кол-во отрицательных элементов массива и сумму модулей элементов массива
Помогите пожалуйста исправить программу. Массив считает кол-во отрицательных элементов массива и...

Получить сумму всех элементов массива, если сумма больше 50, то вывести результат сложения, иначе - сам массив
Задача: Дан массив А(...), нужно получить сумму всех элементов этого массива, если сумма больше 50,...

Вычислить сумму модулей элементов массива после первого отрицательного, сжать массив
С одномерным массивом, состоящим из n вещественных элементов, произвести следующие операции: ...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru