Умножение матриц

[Sand_00]

Подскажите, пожалуюста, как можно умножить три матрицы размерности n, и вывести результат на экран в виде матрицы

[tyomitch]

"Что, студент, сессия? " (c) анек

[xqz_me]

Хм... Воде в книжках это излагается в виде вполне сносного алгоритма... Что мешает его воплотить? А так - делаешь табличку NxN, кнопочку умножить и равно - чем не в виде матрицы получится?

[Sand_00]

мне вот и интересно как эту табличку делать

[Viper]

нды... так в чем вопрос то? Если проблема в процессе умножения, то на ваше студенческое щастье есть Кирпичи, а ежели это проблема отображения матрицы на экране, то классический вопрос: "Какие попытки были сделаны для воплощения желаемого и сто не получилось?"

[Sand_00]

Проблема в выводе результата в виде таблицы... Попытался вывести Print'ом ничего не получилось, вывелся только один столбец матрицы.Как можно организовать красивый вывод?

[Viper]

Куда выводим то?
Показывай код, которым выводил

[Sand_00]

эээ...
For i=1 to n
Print Res(i)
next
на паскале за 10 минут сделал... а тут чето немогу...

[tyomitch]

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

[Viper]

эээ...
For i=1 to n
Print Res(i)
next
на паскале за 10 минут сделал... а тут чето немогу...

Матрица она двумерная, так что индексов то два должно быть... Твой код по идее вообще должен для матрицы ошибку вызывать

[_ae_]

на паскале за 10 минут сделал... а тут чето немогу...

Честно говоря, судя по этому коду верится с трудом.

[Sand_00]

Матрица - двумерный массив, а в коде было res(i,i).... нужно 2-ной цикл делать?
For i=1 to n
For c=1 to n
Print Res(i,c)
next
next
(???)

[Viper]

Прально! тока не забывай новую строку начинать после вывода содержимого строки

[AntonGV]

Выводи в TextBox.

Код: Выделить всё

For i = 1 To n
  For c = 1 To n
    Text1 = Text1 + Str(res(i, c))
  Next
  Text1 = Text1 + vbCrLf
Next

У Text1 свойство MultiLine=true

[Sand_00]

теперь все работaет, благодарю