Дан массив D из 10 элементов заполняется с клавиатуры найти сумму элементов кратных тремСпасибо?

12Niki63 25 мая 2021 г., 10:15:00

Program sum ;

var arr : array[1.

10] of integer ;

res, i : integer ;

begin

for i : = 1 to 10 do readln(arr[i]) ;

for i : = 1 to 10 do

if arr[i] mod 3 = 0 then res : = res + arr[i] ;

write(res) ;

end.

DiG631 9 февр. 2021 г., 09:34:11 | 5 - 9 классы

Дан массив натуральных чисел?

Дан массив натуральных чисел.

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

SLENDR 1 июл. 2021 г., 04:44:03 | 10 - 11 классы

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

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

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

Найти :

1)сумму элементов, имеющих нечетное значение ;

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

Damir5579 10 июн. 2021 г., 22:00:25 | 5 - 9 классы

1. Если все элементы одномерного массива положительные, то вывести сообщение «УСЛОВИЕ ВЫПОЛНЯЕТСЯ», иначе «УСЛОВИЕ НЕ ВЫПОЛНЯЕТСЯ»?

1. Если все элементы одномерного массива положительные, то вывести сообщение «УСЛОВИЕ ВЫПОЛНЯЕТСЯ», иначе «УСЛОВИЕ НЕ ВЫПОЛНЯЕТСЯ».

2. Дан массив из N элементов.

Определить произведение элементов, кратных заданному k (k – задается с клавиатуры).

3. одномерном массиве А(10) вычислить сумму отрицательных элементов, больших чем k.

4. Дан массив из N элементов.

Определить ПРОИЗВЕДЕНИЕ тех элементов, которые кратны 3.

5. Дан массив из N элементов.

Найти сумму элементов с четными номерами и отдельно – с нечетными номерами.

Помогите пожалуйста.

Заранее благодарю.

Logun01 12 мар. 2021 г., 02:41:52 | 5 - 9 классы

Массив с(8) вводится с клавиатуры?

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

Найти наименьший элемент.

Сметана000 2 февр. 2021 г., 21:12:55 | 10 - 11 классы

№1. Дан массив натуральных чиселНайти сумму элементов кратных данному К№2?

№1. Дан массив натуральных чисел

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

№2.

В целочисленной последовательности есть нулевые элементы

Создать массив из номеров этих элементов.

8768574325980 27 июн. 2021 г., 01:01:21 | 5 - 9 классы

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

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

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

2)Дан Массив целых чисел из 33 элементов, заполненный случайным образом числами из промежутка [0, 95].

Вывести на экран все элементы , кратные 13.

____

Все это через FreePascal.

Заранее спасибо!

Дима17072006 23 сент. 2021 г., 22:59:24 | 5 - 9 классы

ПАСКАЛЬ?

ПАСКАЛЬ!

Найти номер второго элемента, кратного 5.

Массив заполняется случайными числами из промежутка [ - 12 ; 12].

Кекс8536 16 сент. 2021 г., 10:26:50 | 10 - 11 классы

Дан массив натуральных чисел?

Дан массив натуральных чисел.

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

Glebburlin 3 июн. 2021 г., 10:09:31 | 5 - 9 классы

1) Дан одномерный массив из 10 элементов, найти сумму всех элементов?

1) Дан одномерный массив из 10 элементов, найти сумму всех элементов.

Volkovanadyshka 15 июн. 2021 г., 21:10:29 | 1 - 4 классы

1. Дан целочисленный массив найти количество элементов кратных пяти2?

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

2.

Найти количество элементов четных и больше 20.