Новости
Видео
Microsoft
Windows 10
Железо
Программы
Форум

Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Программирование и базы данных » Разное - [решено] Помогите с программой для Turbo Pascal (умножение матриц)

< Предыдущая 1 2 3
Ответить
Настройки темы
Разное - [решено] Помогите с программой для Turbo Pascal (умножение матриц)

Новый участник


Сообщения: 40
Благодарности: 2

Профиль | Отправить PM | Цитировать

ПОмогите пожалуйста составить программу для вычисения произведения матриц A,B,C каждая из которых имеет размерность nxn

ВОт составленная мною часть проги, где вводятся сами матрицы, проверьте пожалуйста
program ABC;
var
matrA: array[1..500,1..500] of integer;
matrB: array[1..500,1..500] of integer;
matrC: array[1..500,1..500] of integer;
i: integer;
j: integer;

begin
for i:=1 to n do
for j:=1 to n do
begin
read matrA[i,j];
end;
begin
read matrB[i,j];
end;
begin
read matrC[i,j];
end;

Отправлено: 13:45, 01-10-2010

 

Новый участник


Сообщения: 40
Благодарности: 2

Профиль | Отправить PM | Цитировать

Ну все, причина найдена

MulMatrix(a, b, d, n); d:=MulMatrix(a,b,d,n);
MulMatrix(d, c, e, n); e:=MulMatrix(c,d,e,n);

у нас он вы чиcлял как C*AB , а в планах было AB*C
хоты разницы особой нет, по свойству матриц A*B=B*A но все же лучше будет записать
MulMatrix(a, b, d, n);
MulMatrix(d, c, e, n);
Все правильно?
Это сообщение посчитали полезным следующие участники:

Отправлено: 19:21, 15-10-2010 | #21



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Аватара для lxa85

Необычный


Contributor


Сообщения: 4463
Благодарности: 994

Профиль | Сайт | Отправить PM | Цитировать

Цитата dasha131:
Все правильно? »
Да. Но A*B не равно B*A.
От сюда была ошибка, и я рад, что ты нашла ее первой

-------
- Я не разрешаю тебе быть плохой! Потому что плохие люди совершают плохие поступки. А это нехорошо!
(Из наставлений 5 летней девочки своей младшей сестре)

Отправлено: 19:42, 15-10-2010 | #22

< Предыдущая 1 2 3


Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Программирование и базы данных » Разное - [решено] Помогите с программой для Turbo Pascal (умножение матриц)

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Разное - Всё о TURBO PASCAL (обсуждение, помощь в написание программ, ошибки, Pascal ABC) Loading Программирование и базы данных 41 20-05-2015 15:28
Разное - [решено] Помогите плииз с программой для Turbo Pascal dasha131 Программирование и базы данных 17 04-12-2010 14:06
Прочие - Turbo Pascal 7 Sniper Программное обеспечение Windows 30 01-12-2008 16:04
Turbo Pascal, Помогите написать пару программ kirillsp Программирование и базы данных 11 20-11-2006 23:34
Borland Turbo Pascal 7.0 Guest Программирование и базы данных 4 21-09-2004 18:44


« Предыдущая тема | Следующая тема »


 
Переход