Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.71/14: Рейтинг темы: голосов - 14, средняя оценка - 4.71
1 / 1 / 1
Регистрация: 10.12.2009
Сообщений: 9

Сложение и умножение матриц

29.12.2009, 00:52. Показов 2743. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
помогите я не знаю как сложить и умножит матрицы(((

Составить программу для ввода двухмерных массивов А и В размерностью 4х5 , А=(Akn); b=(Bkn);
k:=1,2,3,4; n=1,2,3,4,5 и вычисления матрецы С по формуле:
Ckn=5*Akn+Bkn;
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
29.12.2009, 00:52
Ответы с готовыми решениями:

Умножение и сложение матриц
Выполнить действия над матрицами C=A*B-8*D A: 2 5 6 -3 7 8 B: 23 6

Сложение и умножение матриц
Помогите пожалуйста реализовать на паскале. Заданы 2 матрицы A и B Найти если возможно матрицы C=A*B и D=A+B.

Умножение, сложение и транспонирование матриц.
Люди добрые,помогите плиз решить задачку девочке))) для заданных матриц размером А,В размером (N*N) составить программу нахождения...

2
3318 / 1380 / 110
Регистрация: 28.04.2009
Сообщений: 4,822
29.12.2009, 05:22

Не по теме:

для общего развития почитайте

http://ru.wikipedia.org/wiki/%... %BA%D0%B0))
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
29.12.2009, 10:04
Лучший ответ Сообщение было отмечено stan__ как решение

Решение

Pascal
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
37
38
39
40
41
uses crt;
const k=4;
      n=5;
type matr=array[1..k,1..n] of integer;{тип матриц}
procedure Vvod(var mt:matr);{создание исходных матриц}
var i,j:byte;
begin
for i:=1 to k do
for j:=1 to n do
mt[i,j]:=random(8)+1;{числа от 1 до 8, можете поменять}
end;
procedure Vyvod(var mt:matr;c:char);{вывод матрицы на экран, с-символ матрицы}
var i,j:byte;
begin
writeln('Matrica ',c);
for i:=1 to k do
 begin
  for j:=1 to n do
  write(mt[i,j]:4);
  writeln;
 end;
end;
procedure Summ(m1,m2:matr;var m3:matr);{сложение матриц по приведенной формуле}
var i,j:byte;
begin
for i:=1 to k do
for j:=1 to n do
m3[i,j]:=5*m1[i,j]+m2[i,j];{умножаем элементы первой матрицы на 5
 и прибавляем соответствующие элементы второй матрицы}
end;
var a,b,c:matr;
begin
clrscr;
Vvod(a);
Vvod(b);
Vyvod(a,'A');
Vyvod(b,'B');
Summ(a,b,c);
Vyvod(c,'C');
readln
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
29.12.2009, 10:04
Помогаю со студенческими работами здесь

Чтение матриц с внешнего файла, умножение матриц...
Вот не могу составить программу... Необходимо считать матрицы А и В с внешнего файла (input). Матрица А размерностью 5х7, В размерностью...

Умножение и сложение
Составить программу, которая печатает таблицу умножения и сложения натуральных чисел в десятичной системе счисления. Помогите решить!!...

Представить умножение через сложение рекурсией
Люди помогите плиз. Нужно представить умножение через сложение при помощи рекурсивной функции.

Умножение матриц
Даны две матрицы А(nxn) и B(nxn). Написать программу получения умножения АВ этих матриц. Добавлено через 32 минуты Дана матрица...

умножение матриц
перемножыть две матрицы розмером n*m


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Идея фильтра интернета (сервер = слой+фильтр).
Hrethgir 31.03.2026
Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда
anaschu 31.03.2026
В прикрепленном документе раздумья о том, как можно поменять модель в будущем
10 пpимет, которые всегда сбываются
Maks 31.03.2026
1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .
Перемещение выделенных строк ТЧ из одного документа в другой
Maks 31.03.2026
Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .
Functional First Web Framework Suave
DevAlt 30.03.2026
Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .
Автоматическое создание документа при проведении другого документа
Maks 29.03.2026
Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .
Настройка движения справочника по регистру сведений
Maks 29.03.2026
Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .
Автозаполнение реквизита при выборе элемента справочника
Maks 27.03.2026
Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru