Форум программистов, компьютерный форум, киберфорум
Наши страницы
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
adams1995
0 / 0 / 0
Регистрация: 08.02.2014
Сообщений: 20
#1

Вычислить сумму модулей элементов - PascalABC.NET

10.06.2014, 00:50. Просмотров 288. Ответов 1
Метки нет (Все метки)

Вычислить сумму абсолютных значений элементов заданной числовой последовательности.
Запрещенные служебные слова: for
Входные данные:
Во входном потоке в первой строке дано единственное целое число N (0 < N <= 100) - число элементов числовой последовательности
Во второй строке перечислены значения положительных элементов целочисленной последовательности (через пробел). Значения элементов не превышает 10.

Выходные данные:
В выходной поток вывести единственное целое число.

Пример входных данных:
10
4 5 2 7 3 6 3 9 8 2
Пример выходных данных:
49
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.06.2014, 00:50
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Вычислить сумму модулей элементов (PascalABC.NET):

Вычислить количество и сумму модулей элементов массива, расположенных после первого отрицательного элемента
В одномерном массиве состоящий из n вещественных элементов,(n,&lt;=50) вычислить...

Найти сумму модулей первых K нечетных элементов массива
Дан одномерный целочисленный массив из N элементов, заполненный датчиком...

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

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

Сгладить матрицу, после чего найти сумму модулей элементов, расположенных ниже главной диагонали
Соседями элемента Aij в матрице назовем элементы Аkl, где i - 1 &lt; k &lt; i + 1 , j...

Найти наибольшее число из элементов и вычислить сумму элементов от первого до наибольшего
Ввести массив из 14 целых чисел. Найти наибольшее число из элементов и...

1
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
3856 / 2843 / 3631
Регистрация: 05.06.2014
Сообщений: 13,939
11.06.2014, 09:17 #2
Лучший ответ Сообщение было отмечено adams1995 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
VaR
  f,g:text;
  m0,n0,sum:integer;
bEGIN
  assign(f,'input.txt');
  reset(f);
  readln(f,m0);
  sum:=0;
  while not eof(f)  do
    begin
      read(f,n0);
      sum:=sum+abs(n0);
    end;
  close(f);
 
  assign(g,'output.txt');
  rewrite(g);
  WriteLn(g,sum);;
  close(g);
  ReadLn;
END.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
11.06.2014, 09:17
Привет! Вот еще темы с решениями:

В массиве, состоящем из n действительных элементов, вычислить сумму элементов массива с нечетными номерами
1) сумму элементов массива с нечетными номерами; 2) сумму элементов массива,...

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

Вычислить сумму модулей элементов массива, расположенных после первого отрицательного элемента
Помогите люди пожалуйста !!! Нужно написать прогу. В одномерном массиве,...

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


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

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

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