Двумерный массив. Найти наибольший элемент. Заменить все элементы первого столбца на максимальный элемент

@CmPunk67 · Регистрация: 11.10.2010

Помогите пожалуйста, контрольную надо исправить, вот эти задачи решить дали:

1. дан двумерный массив n*m заданный случ образом. напечатать этот массив. найти наиб элемент этого массива. заменить все элементы первого столбца на максимальный элемент.

@jonni · 22.11.2010, 19:32

1)

Pascal

Randomize; 
for i:=1 to n do begin
for j:=1 to m do begin
mass[i,j]:=Random(100);
Write(mass[i,j],' ');
end;
writeln;
end; 
max:=mass[1,1];
for i:=1 to n do
for j:=1 to m do
if(a[i,j]>max) then max:=a[i,j];
for i:=1 to m do
a[i,1]:=max;

@CmPunk67 1 / 1 / 0 Регистрация: 11.10.2010 Сообщений: 85
		1
	Двумерный массив. Найти наибольший элемент. Заменить все элементы первого столбца на максимальный элемент 22.11.2010, 19:19. Показов 1198. Ответов 1 Метки нет (Все метки) Помогите пожалуйста, контрольную надо исправить, вот эти задачи решить дали: 1. дан двумерный массив n*m заданный случ образом. напечатать этот массив. найти наиб элемент этого массива. заменить все элементы первого столбца на максимальный элемент. 0

Опции темы

Двумерный массив. Найти наибольший элемент. Заменить все элементы первого столбца на максимальный элемент

Решение