ну вот двумерные массивы((((

[серега222]

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

здесь всё пишется друг под другом просто у меня не получилось так написать. пропуски т.е. точки находятся по середине всей этой матрицы. ну вобщем крест на крест... должна получиться полная матрица...n-1 я специально взял в скобки что бы было понятней.)))но их там не должно быть

[серега222]

Хм.... чёт всё равно не понял понял(((

[Serge_Bliznykov]

серега222

const n=12;
var 
  M : array [1..n,1..n] of integer;
  i, j : integer;
begin
  for i:=1 to n do
    for j:=1 to n do
      if j>(n-i+1) then M[i,j] := 0
      else   M[i,j] := i;

  {вывод матрицы на экран}
  for i:=1 to n do begin
    for j:=1 to n do
       Write(M[i,j]:3);
    WriteLn;
  end;
  ReadLn;
end.