Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 24.04.2009
Сообщений: 41
1

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

19.05.2009, 19:48. Просмотров 1196. Ответов 1
Метки нет (Все метки)

помогите решить задачу...
Найти произведение элементов одномерного массива,больших среднего арифметического элементов.Массив ввести с клавиатуры.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
19.05.2009, 19:48
Ответы с готовыми решениями:

Найти число элементов в каждой строке массива, больших (меньших) среднего арифметического элементов данной строки
ДВУМЕРНЫЙ МАССИВ 1. Найти число элементов в каждой строке, больших (меньших) среднего...

В каждом столбце матрицы найти количество элементов, больших среднего арифметического элементов столбца
помогите с задачей!!! дана матрица размера M*N.в каждом её столбце найти количество...

Найти количество элементов, больших среднего арифметического всех элементов столбца матрицы. Блок схема
program Project1;(*Дана матрица размера m x n. В каждом ее столбце найти количество...

В каждом столбце матрицы найти количество элементов, больших среднего арифметического всех элементов этого столбца
Данная матрица размера М × N. В каждом ее столбце найти количество элементов, больших среднего...

1
7 / 6 / 5
Регистрация: 18.11.2008
Сообщений: 43
19.05.2009, 21:07 2
Лучший ответ Сообщение было отмечено Em$ как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
program array1;
const n=5;
  var a: array[1..n] of integer;
  srednee:real;
  i,s:integer;
  begin
  s:=0;
   for i:=1 to n do begin
   Writeln('Vvedite ',i,'-iy 4len massiva - ');
   ReadLn(a[i]) ;
   s:=s+a[i];
   end;
   srednee:=s/n;
   s:=1;
  for i:= 1 to n do
   if a[i]>srednee then
     s:=s*a[i];
   writeln('Proizvedenie = ',s);
   readln;
   end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
19.05.2009, 21:07

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Определить количество элементов массива, больших среднего арифметического
Задание следующее: В данном числовом массиве определить количество элементов массива, больших...

Вычислить сумму и количество элементов массива, больших среднего арифметического
Вычислить сумму и количество элементов массива X больших числа a, где a – среднее арифметическое...

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

Определить количество элементов, больших среднего арифметического всех элементов
определить количество элементов больших среднего арифметического всех элементов const maxN =...


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

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

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