Дан массив А [12] Подсчитать сумму отрицательных элементов массива?

ИванЖА 28 июн. 2020 г., 11:26:33

Const n = 12 ;

var a : array[1.

N] of integer ; i, s : integer ;

begin

Randomize ;

writeln('Исходный массив : ') ;

for i : = 1 to n do begin a[i] : = Random(41) - 20 ; Write(a[i] : 4)

end ;

writeln ;

s : = 0 ;

for i : = 1 to n do

if a[i] < ; 0 then s : = s + a[i] ;

Writeln('s = ', s) ;

end.

Пример :

Исходный массив : - 21 - 5 - 22 17 5 - 8 - 20 - 3 25 - 6 - 6 21

s = - 91.

Primd 15 февр. 2020 г., 08:34:32 | 5 - 9 классы

Дан массив, содержащий N элементов и заполненный случайными числами от - 10 до 9?

Дан массив, содержащий N элементов и заполненный случайными числами от - 10 до 9.

Сформировать новый массив из значений элементов, стоящих на четных местах.

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

Ariname 14 мая 2020 г., 07:02:43 | 5 - 9 классы

1. Дан массив целых чисел, найти среднее арифметическое всех элементов массива?

1. Дан массив целых чисел, найти среднее арифметическое всех элементов массива.

2. Дан массив целых чисел, найти количество отрицательных элементов массива.

3. Дан массив целых чисел, найти количество чётных чисел в массиве.

Arsenchinhalin 9 февр. 2020 г., 22:22:51 | 5 - 9 классы

Дан массив целых чисел?

Дан массив целых чисел.

Найти сумму элементов массива, больших данного числа А

C + +.

Klublena2011 27 июн. 2020 г., 01:58:52 | 5 - 9 классы

Создать массив из 12 элементов на промежутке [ - 8 ; 10] вынести строчку на экран?

Создать массив из 12 элементов на промежутке [ - 8 ; 10] вынести строчку на экран.

1) подсчитать количество элементов в массиве, значения которых больше 3.

2) найти сумму всех отрицательных элементов массива.

3) заменить все отрицательные элементы массива их индексами.

Вывести новый массив на экран

4)найти максимальный элемент.

Кубишка 18 июл. 2020 г., 12:57:53 | 10 - 11 классы

В массиве подсчитать : сумму чётных элементов?

В массиве подсчитать : сумму чётных элементов.

(Элементов массива : 7.

Массив вводится с клавиатуры).

Privedenie7 2 июл. 2020 г., 15:21:42 | 10 - 11 классы

Помогите решить задачу?

Помогите решить задачу.

Решить через паскаль.

Дан массив В(50) целых чисел.

Подсчитать сумму тех элементов массива, которые нечетны и отрицательны.

SarymovaKaramelya 4 июл. 2020 г., 23:23:18 | 5 - 9 классы

Одномерные массивы?

Одномерные массивы.

Дан массив натуральных чисел, состоящий из n элементов.

Найти сумму элементов массива, кратных данному числу К.

DarthMaul12 23 нояб. 2020 г., 03:21:36 | 10 - 11 классы

Дан массив B(10) ?

Дан массив B(10) .

Элементы массива целые случайные числа из промежутка(0 ; 10).

Найдите сумму всех элементов массива.

ZxDenxz225 4 февр. 2020 г., 10:24:08 | 10 - 11 классы

Дан массив целых чисел из 17 элементов?

Дан массив целых чисел из 17 элементов.

Определить частное от деления суммы положительных элементов массива на модуль суммы отрицательных элементов.

Pro100zheka 5 нояб. 2020 г., 16:50:49 | 5 - 9 классы

Заполнить массив из 10 элементов случайными целыми числами из диапазона - 100 – + 100?

Заполнить массив из 10 элементов случайными целыми числами из диапазона - 100 – + 100.

Найти :

a) наименьший элемент массива и его порядковый номер ;

b) наибольший элемент массива и его порядковый номер ;

c) сумму отрицательных и положительных элементов массива ;

d) среднее арифметическое отрицательных и положительных элементов массива ;

e) количество значений отрицательных, положительных и равных нулю элементов массива ;