массивы

[uHkBu3uTop]

квадратная матрица задана в виде одномерного массива по строкам. Напечатать верхний треугольник матрици (вкл-я элементы главной диагонали) по строкам.

[Stilet]

что-то вроде:

for i:=1 to n do begin
 for j:=1 to n do begin
   if (j<i)or(j>(n-i+1)) then write(#9) else write(a[i,j]);
 end; writeln;
end;

Где a - матрица, n - ее размерность

виде одномерного массива по строкам

Пугающая фразочка.