Question

Что определяет для массива X[1..m, 1..m] следующий алгоритм For i:= 1 to m do For j:= 1 to m do If i mod 2 < > 0 then X[j, i] = A;
Выберите один ответ:
a. минимальный элемент массива;
b. элементы четных столбцов матрицы заменить на А;
c. элементы четных строк матрицы заменить на А;
d. элементы нечетных строк матрицы заменить на А.
e. количество четных элементов массива;

Answer 1

Держи программу. Вывод сделай сам. Верного ответа я не вижу...

const m = 7;

var

 X: array [1..m, 1..m] of integer;

 A, i, j: integer;

begin

randomize;

A := 100;

for i := 1 to m do

begin

 for j := 1 to m do

 begin

   X[i, j] := random(20);

   write(X[i, j]:6);

 end;

 writeln;

end;

write('======================');

writeln('======================');

for i := 1 to m do

for j := 1 to m do

if i mod 2 <> 0 then

X[j, i] := A;

for i := 1 to m do

begin

 for j := 1 to m do

 begin

   write(X[i, j]:6);

 end;

 writeln;

end;    

end.