Ответы
Ответ дал:
0
a матрица(массив)
m и n границы матрицы
min:integer; минимальное. indexmin:string
max:integer; максимальное. indexmax:string
min:=a[1,1];
max:=a[1,1];
for i:=1 to n do
for j:=1 to m do begin
if a[i,j]>max then begin max:=a[i,j]; indexmax:=inttostr(i)+' '+inttostr(j); end;
if a[i,j]<min then begin min:=a[i,j]; indexmin:=inttostr(i)+' '+inttostr(j); end;
end;
writeln(max,indexmax);
writeln(min,indexmin);
m и n границы матрицы
min:integer; минимальное. indexmin:string
max:integer; максимальное. indexmax:string
min:=a[1,1];
max:=a[1,1];
for i:=1 to n do
for j:=1 to m do begin
if a[i,j]>max then begin max:=a[i,j]; indexmax:=inttostr(i)+' '+inttostr(j); end;
if a[i,j]<min then begin min:=a[i,j]; indexmin:=inttostr(i)+' '+inttostr(j); end;
end;
writeln(max,indexmax);
writeln(min,indexmin);
Ответ дал:
0
Можно пожалуйста на паскале ABC
Ответ дал:
0
Это он и есть)
Ответ дал:
0
Ой,извини, невнимательно посмотрела, спасибо большое )
Вас заинтересует
2 года назад
3 года назад
3 года назад
9 лет назад
9 лет назад
9 лет назад