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

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

14.11.2009, 22:28. Просмотров 1037. Ответов 1
Метки нет (Все метки)

Найти и сравнить количества отрицательных элементов, расположенных над и под главной диагональю целочисленной матрицы T[7][7]. В дополнительную строку записать сумму нечетных элементов каждого столбца.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
14.11.2009, 22:28
Ответы с готовыми решениями:

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

Найти число отрицательных элементов матрицы под главной диагональю
Найти число отрицательных элементов под главной диагональю Найти сумму...

Вычислить сумму элементов матрицы, расположенных над главной диагональю
Вычислить сумму элементов матрицы, расположенных над главной диагональю. Размер...

Вычислить сумму элементов матрицы, расположенных над главной диагональю
Вычислить сумму элементов матрицы, расположенных над главной диагональю. Размер...

Вычислить сумму элементов матрицы, расположенных над главной диагональю
Помогите с решением В заданной квадратной матрице A(K,K) (K<=10) вычислить...

1
yanyk1n
4331 / 1463 / 680
Регистрация: 12.03.2009
Сообщений: 5,310
14.11.2009, 22:38 2
Лучший ответ Сообщение было отмечено A'B как решение

Решение

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
uses crt;
var t:array[1..7,1..7]of integer;
     s:array[1..7]of integer;
i,j,c1,c2,s:integer;
 
begin
 clrscr;
 for i:=1 to 7 do
 begin
  for j:=1 to 7 do
  begin
   t[i,j]:=random(30)-20;
   write(t[i,j]:3);
  end;
  writeln;
 end;
 
 c1:=0;
 c2:=0;
 for i:=1 to 7 do
 for j:=i+1 to 7 do if t[i,j]<0 then inc(c1);
 writeln('Отрицательных элементов, выше главной диагонали=',c1);
 
 for i:=1 to 7 do
 for j:=1 to i-1 do if t[i,j]<0 then inc(c2);
 writeln('Отрицательных элементов, ниже главной диагонали=',c2);
 
 for j:=1 to 7 do
 begin
  sum:=0;
  for i:=1 to 7 do if i mod 2=1 then sum:=sum+t[i,j];
  s[j]:=sum;
  writeln('Сумма нечётных элементов в ',j,'-ом столбце=',s[j]);
 end;
 
 readln;
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.11.2009, 22:38

Сумма элементов квадратной матрицы, стоящих под (над) главной диагональю.
Помогите, пожалуйста, исправить ошибки в программе. Вместо двумерного...

Вычислить сумму и число отрицательных элементов произвольной матрицы, находящихся над главной диагональю.
Помогите умоляю вас. Вычислить сумму и число отрицательных элементов...

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


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

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

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