![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы
![]() |
Поиск в этой теме
![]() |
![]() |
#1 |
Пользователь
Регистрация: 14.03.2012
Сообщений: 14
|
![]()
Вот задача
Составить программу вычисления суммы матриц А и В размера 3x3 По моему чтоб решить её надо использовать операторы ввода т.е InputBox и оператор вывода это MsgBox, но как я не понимаю Я знаю например чтоб матрицу транспонировало Вот код Option Explicit Sub Transp() Dim a() As Integer Dim b() As Integer Dim str As String Dim n As Integer Dim m As Integer Dim i As Integer Dim j As Integer n = CInt(InputBox("Kol-vo strok")) m = CInt(InputBox("Kol-vo stolbcov")) ReDim a(1 To n, 1 To m) ReDim b(1 To m, 1 To n) For i = 1 To n For j = 1 To m a(i, j) = InputBox("Vvedite a(" & i & "," & j & ")") Next j Next i For i = 1 To n For j = 1 To m b(j, i) = a(i, j) Next j Next i For i = 1 To m For j = 1 To n str = str & b(i, j) & " " Next j str = str & vbCr Next i MsgBox "Transponir matrix" & vbCr & str, , "Matrix" End Sub Но как сделать проще чтоб считало сумму в размере 3х3 |
![]() |
![]() |
![]() |
#2 |
Участник клуба
Регистрация: 28.06.2009
Сообщений: 1,950
|
![]()
А при чём здесь транспонирование?
|
![]() |
![]() |
![]() |
#3 |
Пользователь
Регистрация: 14.03.2012
Сообщений: 14
|
![]()
Да я так например ну работа с матрицой же, я просто хочу понять как считать суммы матриц А и В размера 3x3, я не понимаю как по этому и спрашиваю
|
![]() |
![]() |
![]() |
#4 | |
Старожил
Регистрация: 08.02.2012
Сообщений: 2,173
|
![]() Цитата:
Правильно поставленная задача - три четверти решения.
|
|
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Программирование вычисления суммы и произведения | irischka-ps | Паскаль, Turbo Pascal, PascalABC.NET | 4 | 01.04.2012 21:58 |
Программа вычисления размера стипендии | bufalo | C# (си шарп) | 1 | 21.09.2011 20:34 |
вычисления суммы: 1! + 2! + 3! + ... | PR0Z0N | Помощь студентам | 2 | 18.06.2009 22:05 |
Составить программу вычисления суммы | Ленка | Помощь студентам | 8 | 28.05.2009 13:29 |
вычисления суммы ряда | kJlaCuk | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 17.09.2008 23:24 |