VPF::Как посчитать матрицу? - Форум программистов

DeeCee

Дата 29.11.2007, 21:32 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 12
Регистрация: 29.11.2007

Репутация: нет
Всего: нет

Помогите пожалуйста посчитать матрицу. Дана матрица размера n*n. Развернуть ее на 90°, на 180°, на 270°. Сосчитать сумму элементов главной диагонали всех матриц и найти их определители

APM

Дата 29.11.2007, 21:39 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 112
Регистрация: 13.7.2007

Репутация: 6
Всего: 6

Задача по программированию или по математике? Если по программированию, то укажите хотя бы язык

0lmer

Дата 30.11.2007, 17:06 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 115
Регистрация: 3.12.2006

Репутация: нет
Всего: -1

попробуй считать определитель с помощью рекурсии.
У меня где то валялась прога по матрицам на С, если найду - скину.

кстати вот:
http://forum.vingrad.ru/forum/topic-37776.html#

Это сообщение отредактировал(а) 0lmer - 30.11.2007, 17:12

Rodman

Дата 1.12.2007, 13:54 (ссылка)

(нет голосов)

Загрузка ...

CIO

Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

Репутация: 26
Всего: 122

M
Rodman

Модератор: Название темы должно отражать ее суть!

--------------------

CRM с функцией АвтоОбзвона

Лотереи мира

DrWeb

Дата 1.12.2007, 15:16 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 78
Регистрация: 25.11.2007
Где: Украина, Донецк

Репутация: 1
Всего: 1

Вот тебе код на паскале(повернули матрицу на 90 градусов).Остальны сам думаю додумаешься;)

Код


uses crt;

const n=5; 

var 
massiv:array[1..n,1..n] of integer; 
res:array[1..n,1..n] of integer; 
row,column,exchange,diagonal:integer; 
begin 
Randomize; 
 {заполняем массив случайным образом и показываем его на экране }
 writeln('исходный массив'); 
 for row:=1 to n do begin 
  for column:=1 to n do begin 
  massiv[row,column]:=random(100); 
  write(' ',massiv[row,column]:2); 
  end; 
  writeln; 
 end; 

 {переставляем строки местами }
for row:=1 to n do begin 
 for column:=1 to n do begin 

{если поворачивать против часовой стрелки то вот такой вариант :}
{res[column,row]:=massiv[row,n-column+1]; }
  res[column,n-row+1]:=massiv[row,column]; 
 end; 
end; 

 writeln; 
{выводим результат }
 writeln('Повернули на 90 градусов по часовой стрелке'); 
 for row:=1 to n do begin 
  for column:=1 to n do begin 
  write(' ',res[row,column]:2); 
  end; 
  writeln; 
 end; 

 readln; 

end.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Центр помощи \| Следующая тема »