1 / 1 / 0
Регистрация: 21.10.2012
Сообщений: 35
1

Найти число m – среднее арифметическое всех элементов массива

17.11.2012, 21:22. Показов 1105. Ответов 2
Метки нет (Все метки)

2) Найти число m – среднее арифметическое всех элементов массива, значение которых меньше числа a, задаваемого пользователем. Определить количество элементов, значения которых меньше m.

Добавлено через 10 минут
помогите пожалуйста
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
17.11.2012, 21:22
Ответы с готовыми решениями:

Найти число m – среднее арифметическое всех элементов массива, значение которых меньше числа a
1) Составить программу, которая заполняет массив случайными целыми числами из диапазона, введенного...

Найти число m – среднее арифметическое всех элементов массива, значение которых меньше числа a
Здравствуйте. 1) Составить программу, которая заполняет массив случайными целыми числами из...

Найти среднее арифметическое всех элементов массива
Доброго времени суток! Помогите, пожалуйста, решить задачу. Вот условие: 1) Составить программу,...

Найти среднее арифметическое всех элементов массива
ввести с клавиатуры массив из 5 элементов найти среднее арифметическое всех элементов массива 4 15...

2
5 / 5 / 4
Регистрация: 17.11.2012
Сообщений: 17
18.11.2012, 00:19 2
Лучший ответ Сообщение было отмечено kventi5 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
const n=25;
var ar:array[1..n] of integer;
    i,a,s,l:integer;
    m:real;
begin
 for i:=1 to n do
 ar[i]:=random(10)-random(20);
 
 for i:=1 to n do
 write(ar[i],' ');
 writeln;
 writeln('Введите a:');
 readln(a);
 
 for i:=1 to n do
 if ar[i]<a then
 begin
 s:=s+ar[i];
 l:=l+1;
 end;
 m:=s/l;
 
 l:=0;
 
 for i:=1 to n do
 if ar[i]<m then
 l:=l+1;
 
 writeln('Число m=',m:1:2);
 writeln('Kоличество элементов, значения которых меньше m равно ',l);
end.
0
1 / 1 / 0
Регистрация: 21.10.2012
Сообщений: 35
18.11.2012, 11:14  [ТС] 3
спасибо огромное
 Комментарий модератора 
Правило форума 5.6. Если какой-либо пост на форуме показался вам полезным, нажмите кнопку "Спасибо" внизу самого поста.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
18.11.2012, 11:14
Помогаю со студенческими работами здесь

Найти среднее арифметическое всех элементов массива
ввести с клавиатуры массив из 5 элементов найти среднее арифметическое всех элементов массива

Найти среднее арифметическое всех элементов массива
№1. Дан массив размера N и целые числа K и L (1 &lt; K &lt;= L &lt;= N). Найти среднее арифметическое всех...

Найти среднее арифметическое всех положительных элементов массива
Найти среднее арифметическое всех положительных элементов массива. Проверить, имеют ли все элементы...

Найти среднее арифметическое всех положительных элементов массива
Дан целочисленный массив из 40 элементов , все элементы которого - целые числа в интервале от -500...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru