Сформировать квадратную матрицу порядка n по данному образчику:0 0 0 ...

Сформировать квадратную матрицу порядка n по данному образцу:
0 0 0 ... 0 0 1
0 0 0 ... 0 2 0
0 0 0 ... 3 0 0
...
0 (n-1) 0 ... 0 0 0
n 0 0 ... 0 0 0

Задать свой вопрос
1 ответ
Const n=5;
var a:array[1..n,1..n] of integer;
i,j:integer;
begin
for i:=1 to n do a[i,n-i+1]:=i;
for i:=1 to n do
 begin
 for j:=1 to n do write(a[i,j]:2);
 writeln;
 end;
end.

Итог:
 0 0 0 0 1
 0 0 0 2 0
 0 0 3 0 0
 0 4 0 0 0
 5 0 0 0 0
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт