С Новым годом! Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.73/11: Рейтинг темы: голосов - 11, средняя оценка - 4.73
1 / 1 / 2
Регистрация: 03.05.2010
Сообщений: 17

Перемножение квадратных матриц

15.09.2010, 19:02. Показов 1940. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Я такой кагбе сочиняю прогу для перемножения двух квадратных матриц, но вот как-то дела мои не клеются( Зато есть унылая наработка:
Visual Basic
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
  Dim n, i, j As Integer, VisMas As String
        n = InputBox("Сколько строк в массиве???")
        Dim Mas1(n - 1, n - 1), Mas2(n - 1, n - 1), Mas3(n - 1, n - 1), k, s As Integer
        For i = 0 To n - 1
            For j = 0 To n - 1
                Mas1(i, j) = InputBox("Ввведите-ка очередной элемент")
            Next j
        Next i
 
        For i = 0 To n - 1
            For j = 0 To n - 1
                Mas2(i, j) = InputBox("Ввведите-ка очередной элемент")
            Next j
        Next i
 
 
 
        For i = 0 To n - 1
            For j = 0 To n - 1
                For k = 0 To n - 1
                    s = s + Mas1(i, k) * Mas2(k, j)
                    Mas3(i, j) = s
                Next k
            Next j
        Next i
 
 
 
        For i = 0 To n - 1
            VisMas = ""
            For j = 0 To n - 1
                VisMas = VisMas & " " & Mas3(i, j)
            Next j
            ListBox1.Items.Add(VisMas)
 
        Next i
Соль ошибки видимо в логике, но её я не нахожу (ни логику ни ошибку).
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
15.09.2010, 19:02
Ответы с готовыми решениями:

Ввод квадратных и прямоугольных матриц
Периодически здесь всплывает один и тот же вопрос: как ввести матрицу? Когда-то давно ещё на Visual Besic 3.0 написал набор модулей для...

Блок-схема к программе, которая находит сумму диагоналей 3х квадратных матриц
вот программа, находит сумму диагоналей 3х квадратных матриц. Можете помочь с блок-схемой к этой задаче?) Заранее спасибо!

Перемножение матриц(квадратных)
Помогите перемножить эти матрицы.Знаю примерный алгоритм,но с реализацией не могу справиться. public class Matrix{ public...

1
6644 / 1511 / 169
Регистрация: 09.01.2010
Сообщений: 4,298
15.09.2010, 19:20
Visual Basic
1
2
3
4
For k = 0 To n - 1
 s = s + Mas1(i, k) * Mas2(k, j)
 Mas3(i, j) = s
 Next k
для начала
Visual Basic
1
2
3
4
5
For k = 0 To n - 1
 s = s + Mas1(i, k) * Mas2(k, j)
 Mas3(i, j) = s
 Next k 
Mas3(i, j) = s
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
15.09.2010, 19:20
Помогаю со студенческими работами здесь

Перемножение двух квадратных целочисленных матриц
Помогите написать прогу: Написать подпрограмму void mult(int a, int b, int c, int N); для перемножения двух квадратных...

Перемножение квадратных матриц с вещественными числами
Что-то никак не могу найти ошибку: #define _CRT_SECURE_NO_WARNINGS #include <iostream> #include <fstream> #include...

Перемножение двух введенных с клавиатуры квадратных матриц 4 порядка
Нужна программа с документацией к ней, вот условие: Разработать программу, рассчитывающую и выводящую на экран результирующую матрицу,...

Перемножение матриц, умножение матриц на вектор, сложение матриц
Помогите пожалуйста написать программу, которая производит основные действия с матрицами произвольных размеров (перемножения 2х матриц,...

Ввести 5 матриц, вывести число квадратных матриц и объяснить что какой оператор значит
нужно написать программу на задачу: ввести 5 матриц, вывести число квадратных матриц и объяснить что какой оператор значит. помогите...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Модель микоризы: классовый агентный подход
anaschu 02.01.2026
Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .
Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути
Programma_Boinc 01.01.2026
Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути Сочетание глобально распределённой вычислительной мощности и инновационных. . .
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост.
Programma_Boinc 28.12.2025
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / **********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / **********/ gallery/ bKBkQFf Пост отсюда. . .
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США.
Programma_Boinc 26.12.2025
Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка.
Programma_Boinc 23.12.2025
Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .
PhpStorm 2025.3: WSL Terminal всегда стартует в ~
and_y87 14.12.2025
PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .
Как объединить две одинаковые БД Access с разными данными
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru