Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
aleksandrchunov
0 / 0 / 0
Регистрация: 18.01.2016
Сообщений: 3
1

Определить элемент, имеющий минимальное отклонение от среднего значения элементов массива

18.01.2016, 13:55. Просмотров 821. Ответов 2
Метки нет (Все метки)

Определить элемент, имеющий минимальное отклонение от среднего значения
элементов массива.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
18.01.2016, 13:55
Ответы с готовыми решениями:

Определить количество тех элементов массива, значения которых меньше среднего арифметического элементов массива
Помогите составить программу Массив содержит 8 действительных чисел....

Даны два целочисленных массива A(m) и B(n). Найти наибольший элемент массива А, не имеющий себе равных в массиве В.
Даны два целочисленных массива A(m) и B(n). Найти наибольший элемент массива А,...

Определить номера элементов массива, значения которых больше значения предыдущего элемента
Дан одномерный массив размерности 20. Заполнить его случайными числами на...

Определить значения элементов массива
какой массив будет создан: for i:=1 to 4 do a= 4-2*i delphi

Найти сумму элементов массива больших среднего арифметического элементов массива, массив задается вручную.
Написать программу, которая вводит с клавиатуры 20 реальных чисел, и...

2
AHBAR
239 / 239 / 167
Регистрация: 05.04.2013
Сообщений: 1,106
18.01.2016, 16:36 2
Лучший ответ Сообщение было отмечено aleksandrchunov как решение

Решение

aleksandrchunov,
Delphi
1
2
3
4
5
6
7
8
9
10
11
s := 0; // real
for i:=1 to n do s := s + a[i]; // сумма всех элементов массива
s := s / n; //  делишь на кол-во элементов
//min := 10000; // min - офигенно большое число в идеале лучше так:
min := 0;
for i:= 1 to n do min := min + abs(a[i]);
for i := 1 to n do
begin
if abs(a[i])-abs(s) < min then Begin min := abs(a[i])-abs(s); j :=i; end;
end;
// a[j] будет искомым
0
aleksandrchunov
0 / 0 / 0
Регистрация: 18.01.2016
Сообщений: 3
18.01.2016, 17:38  [ТС] 3
спасибо
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
18.01.2016, 17:38

Определить границы интервала, в котором находятся значения элементов массива
Ввести массив состоящий из 12 элементов действительного типа. Определить...

Вычислить среднее количество осадков и отклонение от среднего для каждого года
Имеются данные о количестве осадков, выпавших в Москве в течение первых 20 лет....

Определить максимальный элемент массива, среди отрицательных, элементов кратных пяти
надо консольное приложение , без рандомайза функций и процедур в делфи.Прошу...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru