Элементы двухмерного массива 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]
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]