Матрицы once again - Форум «Всё о Паскале»

Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи

Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

Матрицы once again

Опции

Барак	8.12.2003 14:56 Сообщение #1
Гость	Буду очень признателен если поможете с задачей: даны две матрицы А(5,5) и B(5,5). Увеличить в 5 раз все элементы той матрицы в которой сумма диагональных элементов наименьшая считая, что такая матрица одна. Особенно не знаю как найти сумму диагональных элементов!

Ответов

Serega	8.12.2003 16:20 Сообщение #2
Новичок Группа: Пользователи Сообщений: 15 Пол: Мужской Репутация: 0	элеметы главной диагонали: i=j элементы побочной диагонали: i+j=6 (для матрицы 5 на 5) сумма: Код for i:=1 to 5 do for j:=1 to 5 do if (i=j)or(i+j)=6 then sum:=sum+a[i,j]; Сообщение отредактировано: volvo - 17.12.2004 18:03 -------------------- Не могу сидеть, когда другие работают. Пойду полежу.