Вопрос по информатике:
Дан целочисленный массив из 40 элементов. Элементы массива могут принимать произвольные значения. Опишите на русском языке или на одном из языков программирования алгоритм, который находит и выводит номер элемента массива, наименее отличающегося от среднего арифметического всех его элементов.
Но лучше на языке Паскаль
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 02.07.2018 21:26
- Информатика
- remove_red_eye 12764
- thumb_up 84
Ответы и объяснения 1
program approximation;
var m:array[1..40] of real; s,v:real; i,k:integer;
begin
s:=0;
for i := 1 to 40 do
begin
write ('Введите ',i,'-й элемент массива');
readln(m[i]);
s:=s+m[i];
end;
s:=s/40;
v:=m[1]-s;
for i := 2 to 40 do
begin
if (v<(m[i]-s)) then
begin
v:=m[i]-s;
k:=i;
end;
end;
writeln (k,'-й элемент наименее отличается от среднего ',s);
end;
end.
- 04.07.2018 13:03
- thumb_up 15
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.