Сформировать двумерный массив А(5,4). Всем четным элементам полученного массива присвоить значение максимального элемента данного массива.
Ответы на вопрос
Ответил Hasl1337
0
На паскале, если не на паскале нужно, то укажите какой необходим.
const m = 5;
n = 4;
var i, j, max: integer;
a: array[1..m, 1..n] of integer;
begin
writeln('Исходный массив: ');
for i := 1 to m do begin
for j := 1 to n do begin
a[i, j] := random(20);
write(a[i, j]:3);
if(a[i, j] > max) then max := a[i, j];
end;
writeln;
end;
writeln('Максимальный элемента: ', max);
writeln('Конечный массив: ');
for i := 1 to m do begin
for j := 1 to n do begin
if(a[i, j] mod 2 = 0) then a[i, j] := max;
write(a[i, j]:3);
end;
writeln;
end;
end.
const m = 5;
n = 4;
var i, j, max: integer;
a: array[1..m, 1..n] of integer;
begin
writeln('Исходный массив: ');
for i := 1 to m do begin
for j := 1 to n do begin
a[i, j] := random(20);
write(a[i, j]:3);
if(a[i, j] > max) then max := a[i, j];
end;
writeln;
end;
writeln('Максимальный элемента: ', max);
writeln('Конечный массив: ');
for i := 1 to m do begin
for j := 1 to n do begin
if(a[i, j] mod 2 = 0) then a[i, j] := max;
write(a[i, j]:3);
end;
writeln;
end;
end.
Ответил Maksim2009rus
0
Максимальный элемента?)))
Ответил Hasl1337
0
Ошибочка, с кем не бывает ))
Ответил natalij1
0
В чем ошибка?
Ответил Hasl1337
0
Орфографическая ошибка, написал "'Максимальный элемента" вместо "Максимальный элемент" .
Новые вопросы