Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

помогите пожалуйста по двухмерным массивам квадратной матрицы) Pascal

82K
13 мая 2012 года
Marik552
1 / / 13.05.2012
1) В квадратной матрице найти сумму элементов ниже главной диагонали.
2)В квадратной матрице заменить все положительные эл-ты побочной диагонали нулями
83K
13 мая 2012 года
Зинаида_
1 / / 13.05.2012
http://www.reshaem.net/?cGFydG5lcj02ODEz
53K
13 мая 2012 года
fffixed
23 / / 29.12.2011
Нужно объявить и заполнить значениями необходимую матрицу matr размером n x n, тогда первый пункт можно выполнить следующим образом:

 
Код:
var
  int i, j, sum;
  int n; //размерность массива
begin
  sum := 0;
  for i:=0 to n-1 do //проходим по всем строкам
    for j:=0 to i-1 do  //но не по всем столбцам, чтобы не залезть за главную диагональ
      sum := sum + matr[i][j];
Второй пункт:

 
Код:
j := n-1; //начинаем с крайнего правого столбца
for i:=0 to n-1 do //и с верхней строки, по строкам идем сверху вниз
begin
  if (matr[i][j] > 0) then matr[i][j] := 0;
  dec(j); //а по столбцам справа налево
end;
Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог