Форум программистов, компьютерный форум, киберфорум
С++ для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.73/11: Рейтинг темы: голосов - 11, средняя оценка - 4.73
Позитифф
1

Метод обратной матрицы

01.05.2013, 22:12. Просмотров 1954. Ответов 2
Метки нет (Все метки)

Я писал свою программу давно на Паскале.. щас же мне она нужна на языке С++... може кто поможет перевести на С? заранее спасибо...всех с праздниками ( и пожалуйста напишите комментарии)...))
Вот прога на Паскале...

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
program obr_matrica;
var a1,a,c:array[1..3,1..6] of real;
       b,x:array[1..3]  of real;
     j,i,n,k:integer;s,s1:real;
begin
  writeln('Введите n');
  read(n);
  writeln('‚Введите матрицу A1');
  for i:=1 to n do
    for j:=1 to n do read(a1[i,j]);
   writeln('‚ Введите матрицу B');
  for i:=1 to n do read (b[i]);
 
  for i:=1 to n do
                  begin
                   for j:=1 to n do a[i,j]:=a1[i,j];
                   for k:=n+1 to 2*n do if k=i+n then a[i,k]:=1
                                                 else a[i,k]:=0;
                  end;
for i:=1 to n do begin
                 s:=a[i,i];
                 for j:=1 to 2*n do a[i,j]:=a[i,j]/s;
                 for k:=1 to n do
                     if k<>i then
                             begin
                             s1:=a[k,i];
                             for j:=1 to 2*n do a[k,j]:=a[k,j]-s1*a[i,j];
                             end;
                 end;
for i:=1 to n do
for j:=1 to n do c[i,j]:=a[i,n+j];
writeln('*********** Обратная матрица С  ‘**********');
for i:=1 to n do
                 begin
                   for j:=1 to n do write(c[i,j]:10:6,'  ');
                   writeln;
                 end;
for i:=1 to n do
                begin
                 x[i]:=0;
                 for j:=1 to n do x[i]:=x[i]+c[i,j]*b[j];
                end;
writeln('*********** Решение *************');
for i:=1 to n do write (x[i]:4:2,'  ');
end.
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
01.05.2013, 22:12
Ответы с готовыми решениями:

СЛАУ. Метод обратной матрицы, метод Гаусса, метод Крамера, метод Зейделя
Помогите ребят. Не могу построить алгоритмы для этих методов Язык C++

Метод обратной матрицы
Необходимо добавить метод нахождения обратной матрицы #include &lt;iostream&gt; #include &lt;fstream&gt; ...

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

Метод обратной прогонки
Нужно реализовать метод обратной прогонки на с++.МОЖНО ВЗЯТЬ ЛЮБОЙ ПРИМЕР.КТО МОЖЕТ ПОМОГИТЕ!!

2
Грамотный. Безпорно.
16787 / 9683 / 1869
Регистрация: 27.09.2012
Сообщений: 24,028
Записей в блоге: 2
02.05.2013, 22:33 2
Цитата Сообщение от Позитифф Посмотреть сообщение
може кто поможет перевести на С
На С или на С++?
0
2 / 2 / 10
Регистрация: 17.09.2012
Сообщений: 860
22.05.2014, 23:38 3
С++
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.05.2014, 23:38

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

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

Метод гаммирования с обратной связью
имею код программы без алгоритма шифрования. если я все правильно понимаю, то сейчас эта программа...

Метод Крамера или обратной матрцы!
Всем привет! мне надо написать программу для решения уранений метод Крамера или обратной матрцы, но...

Нахождение обратной матрицы
Здравствуйте!помогите с программой на языке си-она демонстрирует нахождение обратной матрицы.я...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.