заполнение матрицы Опции

[Insomnia]

7 6 5 4 3 2 1
6 5 4 3 2 1 2
5 4 3 2 1 2 3
4 3 2 1 2 3 4
3 2 1 2 3 4 5
2 1 2 3 4 5 6
1 2 3 4 5 6 7
как заполнить матрицу размером n*n таким образом?
---
подскажите , от чего мне надо отталкиваться? побочную диагональ я могу заполнить еденицами, а как мне симметрично относительно их, заполнить последующими числами?!

[Freedom]

Тут у нас идёт уже Математика. Смотрим если бы у нас была матрица такого типа

j=1 j=2 j=3 j=4 j=5 j=6 j=7

i=1 1 2 3 4 5 6 7
i=2 2 1 2 3 4 5 6
i=3 3 2 1 2 3 4 5
i=4 4 3 2 1 2 3 4
i=5 5 4 3 2 1 2 3
i=6 6 5 4 3 2 1 2
i=7 7 6 5 4 3 2 1

тогда элемент a[i,j] будет иметь значение |i-j|+1

а эту матрицу нам остаётся отразить слева направо и тогда получится что

j=1 j=2 j=3 j=4 j=5 j=6 j=7

i=1 7 6 5 4 3 2 1
i=2 6 5 4 3 2 1 2
i=3 5 4 3 2 1 2 3
i=4 4 3 2 1 2 3 4
i=5 3 2 1 2 3 4 5
i=6 2 1 2 3 4 5 6
i=7 1 2 3 4 5 6 7

элемент a[i,n-j+1] будет иметь значение |i-j|+1

 for i:=1 to n do
  for j:=1 to n do
   a[i,n-j+1]:=abs(i-j)+1;

Сообщение отредактировано: Freedom - 27.12.2010 18:16