#3 16.05.06 19:03
Re: перемножение строк матрицы
Моя версия:
do l=1, n*n
do i=1,n
do j=1,m
mas(l)=mas(l)+mas(j)*mas(j+(i-1)*m)
enddo
enddo
enddo
m - количество столбцов, n-количество строк. двумерный массив по строкам загнан в одномерный mas(1000000).
загвоздка: выдаёт неправильный результат...
Исправлено Logan_2 (16.05.06 19:06)
Offline
#4 18.05.06 00:12
Re: перемножение строк матрицы
Logan_2 написал(а):
нужен цикл, выполняющий САБЖ, т.е. 1-ую строку умножили на 2-ую, 3-ю и до конца; 2-ую строку умножили на 1-ую, 2-ую и до конца (и так перебрать все строки). желательно на фортране. можно просто алгоритм на словах.
Не понял задачу, поподробнее, пожалуйста...
Offline
#7 19.05.06 10:03
Re: перемножение строк матрицы
повторять с 1 до Н (кол-во строк)
повторять с 1 до Н
скалярное произведение векторов(1-ый вектор, 2-ой вектор,результат, М)
! где М - кол-во столбцов
скалярное произведение векторов (1-ый вектор, 2-ой вектор,результат, М)
{
повторять от 1 до М
результат=результат+текущий элемент 1-ого вектора*текущий элемент 2-ого вектора
}
Исправлено Logan_2 (19.05.06 14:15)
Offline

