Дан массив состоящий из 10 элементов заполнить массив целых чисел найти сумму, количество элементов положительных и кратных три?

Информатика | 5 - 9 классы

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

Ответить на вопрос
Ответы (1)
Gonchar444 7 апр. 2020 г., 01:01:47

Var

i, a, b : integer ;

x : array[1.

10] of integer ;

begin

a : = 0 ;

b : = 0 ;

for i : = 1 to 10 do

begin

begin

x[i] : = random(21) - 10 ;

write(x[i] : 4) ;

end ;

if (x[i]> ; = 0)and(x[i] mod 3 = 0) then

b : = b + 1 ;

end ;

writeln ;

write('количество элементов положительных и кратных три = ', b) ;

writeln ;

for i : = 1 to 10 do

begin

a : = a + x[i] ;

end ;

write('суммa = ', a) ;

end.

Про100кири4 20 янв. 2020 г., 09:27:38 | 10 - 11 классы

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

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

Найти количество элементов массива являющихся кратными трем и пяти.

Nika323232 2 мая 2020 г., 07:13:50 | 10 - 11 классы

Дан массив целых чисел состоящий из 10 элементов?

Дан массив целых чисел состоящий из 10 элементов.

Найти сумму трех минимальных элементов этого массива метот пузыря.

Диана200356 19 янв. 2020 г., 19:36:48 | 5 - 9 классы

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

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

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

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

(паскаль).

Настя2005 3 янв. 2020 г., 06:37:14 | 5 - 9 классы

Дан одномерный массив, состоящий из вещественных элементов?

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

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

5даг05 26 июл. 2020 г., 00:38:29 | 10 - 11 классы

Help?

Help!

Дан массив целых чисел, состоящий из 10 элементов.

Заполнить его с клавиатуры.

Найти : - Удвоенную сумму положительных элементов ; - Удалить все четные элементы массива.

Ntoniy10 30 мар. 2020 г., 04:29:04 | 10 - 11 классы

Дан массив целых чисел, состоящий из 10 элементов?

Дан массив целых чисел, состоящий из 10 элементов.

Заполнить его с клавиатуры.

Найти : - Удвоенную сумму положительных элементов ; - Вывести значения тех элементов, которые меньше заданного числа А кратны 3.

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

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

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

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

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

Annaborash2003 19 сент. 2020 г., 13:21:30 | 10 - 11 классы

Помогите решить задачу в Pascal Дан массив целых чисел, состоящий из 30 элементов?

Помогите решить задачу в Pascal Дан массив целых чисел, состоящий из 30 элементов.

Заполнить его датчиком случайных чисел.

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

LizaNesh 16 окт. 2020 г., 01:25:06 | 5 - 9 классы

В паскале абс заполнить массив 100 целыми случайными числами от - 102 до 102 ?

В паскале абс заполнить массив 100 целыми случайными числами от - 102 до 102 .

Найти сумму всех элементов, входящих в данный массив, наибольший или наименьший элемент, среднее арифметическое, количество чётных чисел, подсчитать все положительные элементы и вывести массив так, чтобы они были выделены другим цветом ?

Gffghvd 8 окт. 2020 г., 19:16:16 | 5 - 9 классы

Дан массив А целых чисел, состоящий из 25 элементов?

Дан массив А целых чисел, состоящий из 25 элементов.

Заполнить с клавиатуры.

3)Найти элемент массива кратный 12 и его индекс.

4)Найти сумму положительных элементов, значения которых меньше 10.

5)Вывести индексы тех элементов, которых кратн.

Вы зашли на страницу вопроса Дан массив состоящий из 10 элементов заполнить массив целых чисел найти сумму, количество элементов положительных и кратных три?, который относится к категории Информатика. По уровню сложности вопрос соответствует учебной программе для учащихся 5 - 9 классов. В этой же категории вы найдете ответ и на другие, похожие вопросы по теме, найти который можно с помощью автоматической системы «умный поиск». Интересную информацию можно найти в комментариях-ответах пользователей, с которыми есть обратная связь для обсуждения темы. Если предложенные варианты ответов не удовлетворяют, создайте свой вариант запроса в верхней строке.