Сформировать квадратную матрицу размера n по заданному массиву

@extrem4ik_ · Регистрация: 14.11.2016

Author24 — интернет-сервис помощи студентам

Требуется помощь по двумерным массивам в PascalABC. Никак не могу составить программу. Задание такое: "Сформирвать квадратную матрицу порядка n по заданному массиву"

1 0 0 0 0 6
0 2 0 0 5 0
0 0 3 4 0 0
0 0 3 4 0 0
0 2 0 0 5 0
1 0 0 0 0 6

@vint-81 · 14.11.2016, 21:23

Pascal

const n=6;
var a:array[1..n,1..n] of byte;
    i,j:byte;
begin
 for i:=1 to n do
  begin
   for j:=1 to n do
    begin
     if (i=j)or(i+j-1=n) then a[i,j]:=j
                         else a[i,j]:=0;
     write(a[i,j]:3)
    end;
   writeln
  end
end.

@extrem4ik_ 0 / 0 / 0 Регистрация: 14.11.2016 Сообщений: 4
		1
	Сформировать квадратную матрицу размера n по заданному массиву 14.11.2016, 19:32. Показов 1384. Ответов 1 Метки pascalabc.net, двумерный массив, квадратная матрица (Все метки) Требуется помощь по двумерным массивам в PascalABC. Никак не могу составить программу. Задание такое: "Сформирвать квадратную матрицу порядка n по заданному массиву" 1 0 0 0 0 6 0 2 0 0 5 0 0 0 3 4 0 0 0 0 3 4 0 0 0 2 0 0 5 0 1 0 0 0 0 6 0

	14.11.2016, 21:23

Сформировать квадратную матрицу размера n по заданному массиву

Решение