В общем дан двумерный массив N^N.
Нужно высчитать суммы средних квадратов массива т.е. подмассивов NxN.
И вот мне нужно после вычисления суммы удалить данный подмассив. Как это можно выполнить?

Пример:
1 2 3 4
4 3 2 1
9 8 7 6
6 7 8 9
Первый шаг: Подсчитали сумму. Удалили:
. . 3 4
. . 2 1
9 8 7 6
6 7 8 9
Второй шаг: Подсчитали сумму. Удалили:
. . . .
. . . .
9 8 7 6
6 7 8 9

Точками являются удалённые элементы

Уточните по какому принципи выделяются подмассивы,потому,что с данной вами информацией немного непонятно.И как обычно,где ваши попытки?

Уж поверьте попыток моих было очень много))
Ну в общем как я писал требуется для начала подсчитать сумму NxN подмассива. Затем просто напросто перейти к следующему подмассиву. А вот у меня это никак не получается(( Поможете?

Ну понимаеш,если я в массиве 4х4 выделю подмассив 3х3,то у меня больше подмассивов не будет.Каким образом мы определяем подмассив?и чо мы делаем,если например остается строка?как в описанном мною случае.Либо мы выделяем подмассивы строго 2х2.плюс НхН означает,что с клавиатуры вводим?Насчет количества попыток....выложите наиболее продуктивную по вашему мнению(наиболее работоспособную)

Легко... Описываешь массивы - не как Array[1.. 4, 1 .. 4] of integer, скажем, а так:

const
  n = 2;
type
  box = array[1 .. n, 1 .. n] of integer;
  matrix = array[1 .. 2, 1 .. 2] of box;

(для твоего случая)

Вот тебе и все решение... Теперь проходи по содержимому matrix, "квадратов" всего 4, и считай для каждого из них что тебе надо...

P.S. Паскаль - язык с очень хорошо развитой системой типов. И если ими пользоваться правильно - то многие проблемы перестают быть вообще проблемами: правильно опиши тип, и обработай его.

Всё это я конечно понимаю, но мне нужно ту часть в которой я буду именно каждый раз записывать новый подмассив NxN из массива N^N.

volvo, я что-то не врубаюсь.. Мне показалось, что Сергею нужно именно подматрицы. Иначе говоря, если разложить большой массив в линию построчно, то первый маленький массивчик будет представлен в нем элементами 1, 2, 5, 6. А если делать так, как ты описал, то подмассивы будут следовать один за другим, то есть элементы первого будут иметь номера 1, 2, 3, 4. По-моему, это противоречит условию.. Или я чего-то не понял)).

Сергей, а что ты подразумеваешь под "удалением"? Замена точками, может, и наглядна, но не говорит ничего о природе самого действия..

Сергей, просьба-замечание к тебе: пожалуйста, пользуйся тэгами для представления степени (кнопка sup)

это зависит от того, как заполнять матрицу данными... Смотри:

const
  n = 2;
type
  box = array[1 .. n, 1 .. n] of integer;
  matrix = array[1 .. 2, 1 .. 2] of box;

procedure print_box(const b: box);
var i, j: integer;
begin
  for i := 1 to n do begin
    for j := 1 to n do write(b[i, j]:4);
    writeln;
  end;
end;
procedure print_mx(const mx: matrix);
var i, j, ib, jb: integer;
begin
  for ib := 1 to 2 do
    for i := 1 to n do begin
      for jb := 1 to 2 do
        for j := 1 to n do write(mx[ib, jb][i, j]:4);
        writeln;
      end;
  writeln;
end;
var
  mx: matrix;
  i, j, ib, jb: integer;
  curr: integer;
begin
  curr := 0;
  for ib := 1 to 2 do
    for i := 1 to n do
      for jb := 1 to 2 do
        for j := 1 to n do begin
          mx[ib, jb][i, j] := curr; inc(curr)
        end;

  writeln('matrix');
  print_mx(mx);

  for ib := 1 to 2 do
    for jb := 1 to 2 do begin
      writeln('box[', ib:2, ',', jb:2, ']:');
      print_box(mx[ib, jb]);
    end;
end.

По-моему, как раз так как нужно заполняется матрица, так, как ее удобнее обрабатывать, а не заполнять... Если стоит задача имеющиеся где-то в файле или получаемые "на лету" данные обработать так, как сказано в первом посте, то есть, квадратными блоками, то как там и что будет использоваться для промежуточного хранения информации - это вообще неважно... Если матрица, описанная как Array[1 .. n, 1 .. n] of integer уже есть, то даже тогда может оказаться выгоднее переформировать данные, как я показал, и очень быстро пробежаться по ним и обработать, не высчитывая каждый раз каких-то индексов, смещений и т.п.

На кой тогда программист вообще нужен, если ничего из средств языка не задействовано? Зачем вообще учить структуры данных, давайте обрабатывать все линейными массивами, и больше ничего не использовать...
В общем, дело ваше, я предложил работающее решение, а воспользоваться им или (как обычно) все переделать по-своему, еще и высказав, что "это неправильно, надо делать по-другому" - дело ваше... Мне как-то плевать на все эти догмы, я использую то, что подходит для решения задачи, а не то, что ПРИНЯТО для этого использовать...
Это уже что-то совсем новенькое, то тебе надо удалять, теперь - записывать... Ты уж определись...

Хм... Спасибо конечно)) В принципе большая часть из данной программы мне пригодится в реализации своей. Спасибо ещё раз

Это верно в случае, когда это есть единственное действие, производящееся с матрицей. В общем случае это не так, и естественное построчное заполнение, безусновно, не имеет конкурентов. Переформатирование матрицы, конечно, возможно, если не жалко память (а ее сейчас обычно не жалко) либо есть возможность сделать это на месте, но тогда ее нужно сделать частью процедуры (где вылезут те же самые смещения и т.п.).
Использование средства языка не может же являться самоцелью. Программист нужен, в частности, для того, чтоб решить, какие средства использовать, а какие нет)). Я не спорю, что такая организация матрицы - первое, что приходит в голову в этом специфическом случае. Но.. (см. выше))

Сергей Меркурьев, Вы намеренно игнорируете мой вопрос в Вашей теме? Это хороший способ добиться игнорирования своих вопросов..