С наступающим Новым годом! Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/3: Рейтинг темы: голосов - 3, средняя оценка - 5.00
Кирилл Алипов
0 / 0 / 0
Регистрация: 06.03.2013
Сообщений: 5
1

Дан массив X(N,M). Сформировать одномерный массив

15.04.2013, 21:26. Просмотров 559. Ответов 3
Метки нет (Все метки)

Дан массив X(N,M). Сформировать одномерный массив,каждым элементом которого является среднее арифметическое соответствующей строки двумерного массива. При вычислении среднего арифметического не включать элементы двумерного массива,равные 0,1,2.
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
15.04.2013, 21:26
Ответы с готовыми решениями:

Дан двухмерный массив размером n*n. Сформировать одномерный массив из элементов заданного массива, расположенных над главной диагональю
Дан двухмерный массив размером n*n. Сформировать одномерный массив из элементов...

Дан двумерный массив. Сформировать одномерный массив, каждый элемент которого равен количеству элементов строки, больших данного числа
1)Дан двумерный массив размерностью 4х6, заполненный целыми числами, введенными...

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

Дан одномерный массив размера n, преобразовать его в обратный массив
дан одномерный масив n количкства преоброзовать его в обратный масив если...

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

3
4kav
0 / 0 / 0
Регистрация: 14.04.2013
Сообщений: 29
15.04.2013, 21:40 2
Попробуй так. На компиляторе не проверял, но получиться должно что-то похожее
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
...
var 
  i, j, num, sum : integer;
  Y : array [1..N] of real;
...
for i := 1 to N do begin
  sum := 0;
  num := 0;
  for j := 1 to M do
    if (X[i, j] <> 0) and (X[i, j] <> 1) and (X[i, j] <> 2) then begin
      sum := sum + X[i, j];
      inc(num);
    end;
  if num <> 0 then
    Y[i] := sum / num
  else
    Y[i] := 0; // Или что-нибудь другое
end;
...
0
Кирилл Алипов
0 / 0 / 0
Регистрация: 06.03.2013
Сообщений: 5
15.04.2013, 21:44  [ТС] 3
ошибку пишет(
0
4kav
0 / 0 / 0
Регистрация: 14.04.2013
Сообщений: 29
16.04.2013, 09:51 4
У тебя массив как задается - в тексте программы, с клавиатуры или случайно?
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
16.04.2013, 09:51

Двумерный массив. Сформировать одномерный массив из отрицательных элементов и вычислить их сумму
Задан двухмерный массив целых чисел А размером N на М. Сформировать одномерный...

Одномерный массив. Сформировать массив из элементов исходного, больших его среднего зачения
вот задание:Дан массив X(N). Сформировать массив Y из элементов массив...

Дан массив X(N). Сформировать массив Y из элементов массива X, больших 100
Добрый день. Дан массив X(N). Сформировать массив Y из элементов массива X,...


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

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

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