С Новым годом! Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.62/74: Рейтинг темы: голосов - 74, средняя оценка - 4.62
0 / 0 / 0
Регистрация: 10.03.2014
Сообщений: 23
1

Дан целочисленный массив из 30 элементов. Элементы массива могут принимать значения от –1000 до 1000

15.05.2014, 14:00. Показов 14016. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
5) Дан целочисленный массив из 30 элементов. Элементы массива могут принимать значения от –1000 до 1000. Опишите на русском языке или на одном из языков программирования алгоритм, который находит и выводит среднее арифметическое всех элементов массива, оканчивающихся цифрой 5. Гарантируется, что хотя бы один такое элемент в массиве есть.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
15.05.2014, 14:00
Ответы с готовыми решениями:

Дан целочисленный массив из n элементов. Элементы массива могут принимать произвольные значения
Дан целочисленный массив из n элементов. Элементы массива могут принимать произвольные значения от...

Дан целочисленный массив из 30 элементов.Элементы массива могут принимать произвольные целые значения.Опишите на русском
const N=30; var a:array of integer; i,j,min,min2,s:integer; begin for i:=1 to N do readln ...

Дан целочисленный массив из 30 элементов. Элементы могут принимать значения от 160 до 200
Дан целочисленный массив из 30 элементов. Элементы могут принимать значения от 160 до 200 *– рост...

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

1
Модератор
Эксперт Pascal/DelphiЭксперт NIX
7795 / 4618 / 2831
Регистрация: 22.11.2013
Сообщений: 13,114
Записей в блоге: 1
16.05.2014, 11:12 2
Лучший ответ Сообщение было отмечено kaiz как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var
  a: array [1..30] of integer;
  i, c, s: integer;
begin
  { заполнение массива }
  Randomize;
  for i:=1 to 30 do a[i]:=-1000+Random(2001);
  a[Random(30)+1]:=-955+Random(200)*10;
  { нахождение среднего арифметического заданных чисел }
  s:=0; c:=0;
  for i:=1 to 30 do
    if a[i] mod 10 = 5 then begin
      s:=s+a[i]; c:=c+1;
    end;
  WriteLn('Среднее арифметическое чисел, заканчивающихся на 5: ',s/c);
end.
1
16.05.2014, 11:12
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
16.05.2014, 11:12
Помогаю со студенческими работами здесь

Дана матрица размерностью 4х5. Элементы матрицы определяются случайным образом в диапазоне -1000.1000
Определить количество положительных и отрицательных чисел, сравнить их, в качестве соответствия...

Дан целочисленный массив A размером n. Построить массив B, содержащий элементы массива A
Дан целочисленный массив A размером n. Построить массив B, содержащий элементы массива A, стоящие в...

Дан целочисленный массив A размера N. Переписать в новый целочисленный массив B все элементы с нечетными порядковыми номерами (1, 3, …)
Дан целочисленный массив A размера N. Переписать в новый целочисленный массив B все элементы с...

Дан символьный массив А. Получить целочисленный массив В, элементы которого имеют коды ASCII элементов A
через процедуры, ascii код Дан символьный массив А, состоящий из 8 элементов. Получить...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru