Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/3: Рейтинг темы: голосов - 3, средняя оценка - 5.00
Nulled
0 / 0 / 2
Регистрация: 21.08.2010
Сообщений: 56
1

Построить вектор B, где B(i) - число нулевых элементов в i столце

27.11.2011, 18:20. Просмотров 568. Ответов 1
Метки нет (Все метки)

Вот например у меня есть прямоугольная матрица. A[j,i] Я ввожу размер прямоугольной матрицы и значения ее элементов, потом нужно востроить вектор B , где B(i) - число нулевых элементов в i столце. Тоесть мне нужно в столбцах найти нулевые элементы и вывести их. Не подскажите как это можно сделать?

Я пробую вот так, но что то не правильно...

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
i{1элемент},j{2элемент},n{строки},m{столбцы}
 
 for i:=1 to m do
 begin
 nul:=0;
 for j:=1 to n do
 if 
 A[j,i]=A[nul,i]
 then 
 A[nul,i]:=A[j,i];
 B[i]:=A[nul,i];
 end;
//вывод...
 writeln;
 writeln(' Вектор B:');
 for i:=1 to m do
 write(' В[',i,']=',B[i]);
 end.
0
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
27.11.2011, 18:20
Ответы с готовыми решениями:

Ввести размер прямоугольной матрицы и значения ее элементов. Построить вектор В, где B(i) -число элементов i-oro столбца
Ввести размер прямоугольной матрицы и значения ее элементов. Построить вектор В, где B(i) -число...

нужно построить вектор В, где В(i) - число элементов i-ой строки, значения которых меньше заданного значения.
помогите подалуйста сделать прогу! нужно построить вектор В, где В(i) - число элементов i-ой...

Построить вектор,i-ый элемент которого равен количеству нулевых элементов в i-ом столбце матрицы.
Дана матрица А(n,m)целых чисел.Построить вектор,i-ый элемент которого равен количеству нулевых...

Подсчитать число нулевых элементов для матриц a(n,m) и b(m,n),где m=3,n=4...
Подсчитать число нулевых элементов для матриц a(n,m) и b(m,n),где m=3,n=4. если не сложно решите п...

1
versa4e
trainspotting
1083 / 483 / 384
Регистрация: 11.11.2010
Сообщений: 773
27.11.2011, 19:11 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
const
  nmax=100;
type
  dmas=array[1..nmax,1..nmax] of integer;
  mas=array[1..nmax] of integer;
var
  z:dmas;
  x:mas;
  i,j,m,n,k_zero:integer;
begin
  randomize;
  repeat
    write('Skolko strok v matritse, ne bolee ',nmax,': ');
    readln(n);
    write('Skolko stolbtsov v matritse, ne bolee ',nmax,': ');
    readln(m);
  until (n in [1..nmax]) and (m in [1..nmax]);
  for i:=1 to n do
    for j:=1 to m do
      begin
        z[i,j]:=random(7);
        write(z[i,j]:4);
        if j=m then
          writeln;
      end;
  writeln;
  for j:=1 to m do
    begin
      k_zero:=0;
      for i:=1 to n do
        if z[i,j]=0 then
          k_zero:=k_zero+1;
      x[j]:=k_zero;
    end;
  writeln('Massiv b:');
  for i:=1 to m do
    write(x[i]:4);
end.
0
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
27.11.2011, 19:11

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

Функции и процедуры. Подсчитать число нулевых элементов для матриц a(n,m) и b(m,n),где m=3,n=4.
Подсчитать число нулевых элементов для матриц a(n,m) и b(m,n),где m=3,n=4.я короче ваще нуб!тем...

Построить вектор b, где bi, i=1, …, n – сумма положительных элементов i-ой строки матрицы
Дана квадратная матрица A(nхn). Построить вектор b, где bi, i=1,…,n – сумма положительных элементов...

Построить вектор b, где bi, i=1,…,n – количество четных элементов i-й строки матрицы
Дана квадратная матрица A(nхn). Построить вектор b, где bi, i=1,…,n – количество четных элементов...

Построить вектор b, где bi, i=1,…,n – сумма нечетных элементов i-й строки матрицы
3. Дана квадратная матрица A(nхn). Построить вектор b, где bi, i=1,…,n – сумма не-четных элементов...


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

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

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