Аватар для kiper35
2 / 2 / 0
Регистрация: 29.02.2012
Сообщений: 27

Составить программу для умножения и сложения матриц.

25.03.2012, 21:58. Показов 1809. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
В программе предусмотреть вывод исходных матриц и матрицы - результата.
| 5 3 -1 | | 1 4 16 |
A= | 2 0 4 | B= | -3 -2 0 |
| 3 5 -1 | | 5 7 2 |

C=2x(A-B/2)+AxB
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
25.03.2012, 21:58
Ответы с готовыми решениями:

Напишите программу ввода, сложения и умножения двух матриц
Напишите программу ввода, сложения и умножения двух матриц

Составить программу для сложения, разности, умножения и деления "длинных" чисел
Нужно составить программу для сложения, разности, умножения и деления "длинных" чисел в Паскале! Заранее очень благодарен

Составить программу умножения матриц.
Составить подпрограмму умножения матриц и подпрограмму их сравнения.Помогите написать программу)

3
 Аватар для kiper35
2 / 2 / 0
Регистрация: 29.02.2012
Сообщений: 27
25.03.2012, 22:29  [ТС]
Матрицы.
Миниатюры
Составить программу для умножения и сложения матриц.  
0
Почетный модератор
 Аватар для Puporev
64312 / 47609 / 32742
Регистрация: 18.05.2008
Сообщений: 115,168
26.03.2012, 09:37
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
42
43
44
45
46
uses crt;
const n=3;
      a:array[1..n,1..n] of integer=((5,3,-1),(2,0,4),(3,5,-1));
      b:array[1..n,1..n] of integer=((1,4,16),(-3,-2,0),(5,7,2));
var c,p,r:array[1..n,1..n] of integer;
    i,j,k:byte;
begin
clrscr;
writeln('Матрица А:');
for i:=1 to n do
 begin
  for j:=1 to n do
  write(a[i,j]:4);
  writeln;
 end;
writeln;
writeln('Матрица B:');
for i:=1 to n do
 begin
  for j:=1 to n do
  write(b[i,j]:4);
  writeln;
 end;
writeln;
for i:=1 to n do
for j:=1 to n do
r[i,j]:=2*a[i,j]-b[i,j];
for k:=1 to n do
for j:=1 to n do
 begin
  p[k,j]:=0;
  for i:=1 to n do
  p[k,j]:=p[k,j]+a[k,i]*b[i,j];
 end;
writeln('Полученная матрица:');
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    c[i,j]:=r[i,j]+p[i,j];
    write(c[i,j]:4);
   end;
  writeln;
 end;
readln
end.
1
 Аватар для kiper35
2 / 2 / 0
Регистрация: 29.02.2012
Сообщений: 27
26.03.2012, 10:36  [ТС]
Большое спасибо!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
26.03.2012, 10:36
Помогаю со студенческими работами здесь

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

Написать процедуру для сложения, умножения квадратных матриц N*N, и умножения матрицы на вектор
Написать процедуру для сложения, умножения квадратных матриц N*N, и умножения матрицы на вектор

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

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

Написать свой класс, реализующий матричную арифметику, операции сложения и умножения матриц. Сложения матрицы с числом и
Написать свой класс, реализующий матричную арифметику, операции сложения и умножения матриц. Сложения матрицы с числом и умножения матрицы...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

Новые блоги и статьи
И решил я переделать этот ноут в машину для распределенных вычислений
Programma_Boinc 09.11.2025
И решил я переделать этот ноут в машину для распределенных вычислений Всем привет. А вот мой компьютер, переделанный из ноутбука. Был у меня ноут асус 2011 года. Со временем корпус превратился. . .
Мысли в слух
kumehtar 07.11.2025
Заметил среди людей, что по-настоящему верная дружба бывает между теми, с кем нечего делить.
Новая зверюга
volvo 07.11.2025
Подарок на Хеллоуин, и теперь у нас кроме Tuxedo Cat есть еще и щенок далматинца: Хочу еще Симбу взять, очень нравится. . .
Инференс ML моделей в Java: TensorFlow, DL4J и DJL
Javaican 05.11.2025
Python захватил мир машинного обучения - это факт. Но когда дело доходит до продакшена, ситуация не так однозначна. Помню проект в крупном банке три года назад: команда data science натренировала. . .
Mapped types (отображённые типы) в TypeScript
Reangularity 03.11.2025
Mapped types работают как конвейер - берут существующую структуру и производят новую по заданным правилам. Меняют модификаторы свойств, трансформируют значения, фильтруют ключи. Один раз описал. . .
Адаптивная случайность в Unity: динамические вероятности для улучшения игрового дизайна
GameUnited 02.11.2025
Мой знакомый геймдизайнер потерял двадцать процентов активной аудитории за неделю. А виновником оказался обычный генератор псевдослучайных чисел. Казалось бы - добавил в карточную игру случайное. . .
Протоколы в Python
py-thonny 31.10.2025
Традиционная утиная типизация работает просто: попробовал вызвать метод, получилось - отлично, не получилось - упал с ошибкой в рантайме. Протоколы добавляют сюда проверку на этапе статического. . .
C++26: Read-copy-update (RCU)
bytestream 30.10.2025
Прошло почти двадцать лет с тех пор, как производители процессоров отказались от гонки мегагерц и перешли на многоядерность. И знаете что? Мы до сих пор спотыкаемся о те же грабли. Каждый раз, когда. . .
Изображения webp на старых x32 ОС Windows XP и Windows 7
Argus19 30.10.2025
Изображения webp на старых x32 ОС Windows XP и Windows 7 Чтобы решить задачу, использовал интернет: поисковики Google и Yandex, а также подсказки Deep Seek. Как оказалось, чтобы создать. . .
Passkey в ASP.NET Core identity
stackOverflow 29.10.2025
Пароли мертвы. Нет, серьезно - я повторяю это уже лет пять, но теперь впервые за это время чувствую, что это не просто красивые слова. В . NET 10 команда Microsoft внедрила поддержку Passkey прямо в. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru