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

Для каждого массива вычислить среднее арифметическое и количество элементов

15.04.2010, 23:05. Показов 3037. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Ппмогите, пожалуйста составить программы:
1)Заданы три одномерных массива X, Y, Z. Количество элементов каждого массива не превышает 15. Для каждого массива вычислить:
-сумму квадратов отрицательных элементов,
-количество отрицательных элементов;
Использовать подпрограмму-процедуру.

2)Заданы 4 одномерных массива произвольных размеровю Для каждого массива вычислить среднее арифметическое и количество элементов, не превышающих это среднее арифметическое значение. Использовать подпрограмму-функцию.

3)Дан массив {Wij} i:=1..L, j:=1..L. L - целое, не больше 20. Записать отрицательные элементы побочной диагонали, а так же второй строки и второго столбца соответственно в массивы {Tk}, {Fn}, {Cm}, расположив их в каждом массивев порядке возрастания. Использовать подпрограмму-процедуру
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
15.04.2010, 23:05
Ответы с готовыми решениями:

Вычислить среднее арифметическое элементов массива Y и отклонение от среднего для каждого элемента
буду очень признательна если поможете с решением) дан массив Y(14) вычислить среднее...

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

При помощи функции вычислить среднее арифметическое элементов каждого массива
1.Ввести три массива X, Y, Z. При помощи функции вычислить среднее арифметическое элементов каждого...

Для каждого столбца массива найти среднее арифметическое элементов
Помогите составить условие в двумерном динамическом массиве for i:=0 to n-1 do begin for...

1
ЧакЭ одобряЭ
285 / 284 / 86
Регистрация: 27.12.2009
Сообщений: 1,767
15.04.2010, 23:54 2
Лучший ответ Сообщение было отмечено Юля// как решение

Решение

номер 2
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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
uses
  crt;
 
 
 
procedure number2(j: integer);
var
  a: array[1..100] of integer;
  i, m, k: integer;
  sr: real;
 
 
begin
  randomize;
  repeat
   writeln('размерность массива');
    readln(m);
  until m in [2..100];
  for i := 1 to m do 
  begin
    a[i] := random(20) - 5;
  end;
  writeln('массив', ' ', j);
  for i := 1 to m do 
  begin
    write(a[i], ' ');
  end;
  for i := 1 to m do 
  begin
    sr := sr + a[i];
  end;
  sr := sr / m;
  for i := 1 to m do 
  begin
    if a[i] <= sr then begin
      inc(k);
    end;
  end;
  readln;
  writeln('среднее арифм', ' ', sr:2);
  writeln('количество элементов', ' ', k);
end;
 
var
  j: integer;
 
begin
  for j := 1 to 4 do 
  begin
    number2(j);
  end;
  readln;
end.
номер 1
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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
uses
  crt;
 
 
 
procedure maxi(j:integer);
var
  a: array[1..100] of integer;
  i, m, k, max: integer;
 
begin
  randomize;
  repeat
   writeln('размерность массива');
    readln(m);
  until m in [2..15];
  for i := 1 to m do 
  begin
    a[i] := random(20) - 5;
  end;
  writeln('массив',' ',j);
  for i := 1 to m do 
  begin
    write(a[i], ' ');
  end;
  max := a[1];
  for i := 1 to m do 
  begin
    if a[i + 1] > max then begin
      max := a[i + 1];
    end;
    if a[i] < 0 then 
    begin
      k:=k+sqr(a[i]);
    end;
  end;
  readln;
  writeln('максамиальный элемент', ' ', max);
  writeln('сумма квадратов отрицательных', ' ', k);
end;
 
var
  j: integer;
 
begin
  for j := 1 to 3 do 
  begin
    maxi(j);
  end;
  readln;
end.
1
15.04.2010, 23:54
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
15.04.2010, 23:54
Помогаю со студенческими работами здесь

Вычислить среднее арифметическое и количество отрицательных элементов массива
Задача №1 Дан массив размера N. Вычислить среднее арифметическое и кол – во отрицательных...

Вычислить среднее арифметическое значение и количество элементов массива
Составить программу решения задачи, используя оператор цикла FOR. Значения элементов массива ввести...

Для каждого массива в диалоге ввести размер массива и элементы массива и найти сумму и среднее арифметическое значение для каждого массива
даны 3 различных массива целых чисел(размер каждого не должен превышать 15). Для каждого массива в...

Найти среднее арифметическое элементов для каждого из столбцов массива, имеющих четные номера
помогите пожалуйста ооч надо Пусть дано натуральное число n и вещественная матрица размером n*9....

Вычислить среднее арифметическое положительных элементов и их количество для трех массивов
Вычислить среднее арифметическое положительных элементов и их количество для массивов...

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


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

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

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