Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
1 / 1 / 1
Регистрация: 19.01.2012
Сообщений: 16
1

Для квадратных матриц a, b, c одинаковой размерности найти матрицу d

21.01.2012, 09:07. Показов 899. Ответов 1
Метки нет (Все метки)

для квадратных матриц a,b,c одинаковой размерности. найти матрицу d.
d=a(c^T-B)+2A-B
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
21.01.2012, 09:07
Ответы с готовыми решениями:

Для квадратных матриц А, В, С одинаковой размерности найти матрицу D
Ребят, помогите, пожалуйста!!! Для квадратных матриц А, В, С одинаковой размерности найти...

Для квадратных матриц a,b,c ,одинаковой размерности,найти матрицу D
Для квадратных матриц a,b,c ,одинаковой размерности,найти матрицу D. (Важное Условие задача...

Для квадратных матриц А, В и С одинаковой размерности найти матрицу D
для квадратных матриц А,В и С одинаковой размерности найти матрицу D. Организовать проверку работы...

Для квадратных матриц A,B и С одинаковой размерности найти матрицу D
Для квадратных матриц A,B и С одинаковой размерности найти матрицу D.Организовать проверку работы...

1
13 / 13 / 12
Регистрация: 24.12.2011
Сообщений: 42
21.01.2012, 18:36 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
54
55
56
57
58
59
60
61
program matrica;
 uses crt;
 type
  mas=array[1..30,1..30] of integer;
 var
  s,k,i,j,n:integer;
  e,cb,ct,a,b,c,d:mas;
 begin
  clrscr;
  writeln('введите размер матрицы n');
  readln(n);
  randomize;
  writeln('a=');
 for i:=1 to n do begin
 for j:=1 to n do begin
  a[i,j]:= random(10);
  write(a[i,j]:4);
  end;
  writeln;
  end;
  writeln('b=');
 for i:=1 to n do begin
 for j:=1 to n do begin
  b[i,j]:= random(10);
  write(b[i,j]:4);
  end;
  writeln;
  end;
  writeln('c=');
 for i:=1 to n do begin
 for j:=1 to n do begin
  c[i,j]:= random(10);
  write(c[i,j]:4);
  end;
  writeln;
  end;
  for i:=1 to n do begin
  for j:=1 to n do begin
  ct[i,j]:=c[j,i];
  cb[i,j]:=ct[i,j]-b[i,j];
  end;
  end;
  for i:=1 to n do
  for j:=1 to n do begin
  s:=0;
  for k:=1 to n do
  s:=s+a[i,k]*cb[k,j];
  e[i,j]:=s;
  end;
  for i:=1 to n do
  for j:=1 to n do
  d[i,j]:=e[i,j]+a[i,j]*2-b[i,j];
  writeln('d=');
  for i:=1 to n do begin
  for j:=1 to n do begin
  write(d[i,j]:4);
  end;
  writeln;
  end;
  readln
  end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
21.01.2012, 18:36

Для квадратных матриц а, b, c одинаковой размерности. Найти матрицу d
для квадратных матриц а,b,c одинаковой размерности . найти матрицу d/ Program mas; Uses crt;...

Для квадратной матриц a, b, c, одинаковой размерности, найти матрицу D
Господа,помогите пожалуйста мне с заданием. "Для квадратной матриц a,b,c,одинаковой...

Для квадратной матрицы a, b, c одинаковой размерности найти матрицу d
Для квадратной матрицы a,b,c одинаковой размерности найти матрицу d. Организовать проверку работы...

Для квадратной матрицы a,b,c одинаковой размерности найти матрицу d (D=AC+3(-A+B)^t+B))
Для квадратной матрицы a,b,c одинаковой размерности найти матрицу d. Организовать проверку работы...

Программа перемножает два квадратных массива одинаковой размерности
Программа перемножает два квадратных массива одинаковой размерности, считанных из двух файлов. В...

Программа перемножает два квадратных массива одинаковой размерности, считанных из двух файлов
4. Программа перемножает два квадратных массива одинаковой размерности, считанных из двух файлов. В...


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

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

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