Найти среднее арифметическое элементов массива кратных 5.
5-9 класс
|
Паскаль.
//Создаем массив, наполняем...
...
Summa:=0;
counterTwo := 0;
for counter := 1 To N Do
if (Massive[counter] mod 5 = 0) then
begin
Summa:= Summa + Massive[counter];
counterTwo := counterTwo + 1;
end;
Writeln(Summa/counterTwo);
readln()
end.
Другие вопросы из категории
Читайте также
2. Дан массив целых чисел,найти количество отрицательных элементов массива.
3. Дан массив целых чисел,найти количество чётных чисел в массиве.
2. Массив из 6 отрицательных и положительных целых чисел вводится в области описания констант. Найти сумму положительных элементов массива.
3. Массив из 5 целых чисел вводится с клавиатуры в строку. Найти сумму элементов массива, стоящих на чётных позициях. Вывести исходный массив и полученную сумму.
4. Массив из 40 целых чисел из промежутка [10,90] задается с помощью генератора случайных чисел. Найти сумму элементов массива, кратных n . Вывести исходный массив и полученную сумму.
Помогите кто в чем может.
элементов массива. 3) найти минимальное значение среди элементов массива <25 и положительных и номера,соответствующего элемента.
элементов массива.
3)задан массив из 9 целых чисел.Вывести на экран чётные элементы
элементов. 3) Составьте программу вычисления среднего арифметического элементов массива. Пожалуйста.. очень надо!