Question

Элементы двухмерного массива A размером NxN первоначально были равны 1000. Затем значения некоторых из них меняют с помощью следующего фрагмента программы:

k := 0;
for i:=1 to N do
for j:=N-i+1 to N do begin
k:= k + 1;
A[i,j]:= k;
end;

Какой элемент массива в результате будет иметь минимальное значение?

1) A[1,1]
2) A[1,N]
3) A[N,1]
4) A[N,N]

Answer 1

Для пользы дела запусти такую программу:

uses Crt;
const N=5;
type Vec=array [1..N, 1..N]  of integer;
 var i, j , k: integer;
     A: Vec;
begin
 ClrScr;
 for i:=1 to N do
   for j:=1 to N do
     A[i,j]:=1000;
 k := 0;
 for i:=1 to N do
   for j:=N-i+1 to N do
     begin
     k:= k + 1;
     A[i,j]:= k;
     end;
 for i:=1 to N do
   begin
      for j:=1 to N do
        Write (A[i,j]:5);
   WriteLn;
   end;

 ReadLn;
end.


Минимальное значение имеет элемент A[1; N] и он равен 1.
Правильный ответ  2) A[1, N]