По разделам

 

Решение задачи Matrix 75


Дана матрица размера M × N. Элемент матрицы называется ее локальным максимумом, если он больше всех окружающих его элементов. Поменять знак всех локальныx максимумов данной матрицы на противоположный. При решении допускается использовать вспомогательную матрицу.

Код (Pascal)

program Matrix75;
type
  matrix = array [1..10,1..10] of integer;
 
var
  a:matrix;
  K, M, N, i, j:Integer;
 
Function CheckMatrixLocMax(var mat:matrix; X,Y:Integer):Boolean;
 Begin
  CheckMatrixLocMax:=true;
  if x>1 then
   if mat[x,y]<=mat[x-1,y] then CheckMatrixLocMax:=False;
  if x1 then
   if mat[x,y]<=mat[x,y-1] then CheckMatrixLocMax:=False;
  if y1) and (x>1) then
   if mat[x,y]<=mat[x-1,y-1] then CheckMatrixLocMax:=False;
  if (y<N) and (x<M) then
   if mat[x,y]<=mat[x+1,y+1] then CheckMatrixLocMax:=False;   if (y>1) and (x<M) then
   if mat[x,y]<=mat[x+1,y-1] then CheckMatrixLocMax:=False;
  if (y<N) and (x>1) then
   if mat[x,y]<=mat[x-1,y+1] then CheckMatrixLocMax:=False;
 end;
 
begin
 Write('N: ');
 Readln(N);
 Write('M: ');
 Readln(M);
 
 for  i:=1 to M do
  begin
   writeln(i,': ');
   for j:=1 to N do
    begin
     Write(j,' : ');
     Read(a[i,j]);
    end;
  end;
 
 for  i:=1 to M do
   for j:=1 to N do
     if CheckMatrixLocMax(a,i,j) then a[i,j]:=(-1)*a[i,j];
 
 for  i:=1 to M do
  begin
   for j:=1 to N do
    begin
     Write(' : ',a[i,j]);
    end;
   writeln(' : ');
  end;
end.
									




Matrix. Абрамян
Matrix 1 Просмотров: 633
Matrix 2 Просмотров: 295
Matrix 3 Просмотров: 259
Matrix 4 Просмотров: 237
Matrix 5 Просмотров: 284
Matrix 6 Просмотров: 312
Matrix 7 Просмотров: 238
Matrix 8 Просмотров: 275
Matrix 9 Просмотров: 290
Matrix 10 Просмотров: 275
Matrix 11 Просмотров: 288
Matrix 12 Просмотров: 309
Matrix 13 Просмотров: 275
Matrix 14 Просмотров: 266
Matrix 15 Просмотров: 336
Matrix 16 Просмотров: 239
Matrix 17 Просмотров: 316
Matrix 18 Просмотров: 211
Matrix 19 Просмотров: 263
Matrix 20 Просмотров: 342
Matrix 21 Просмотров: 216
Matrix 22 Просмотров: 217
Matrix 23 Просмотров: 296
Matrix 24 Просмотров: 211
Matrix 25 Просмотров: 214
Matrix 26 Просмотров: 223
Matrix 27 Просмотров: 198
Matrix 28 Просмотров: 178
Matrix 29 Просмотров: 155
Matrix 30 Просмотров: 212
Matrix 31 Просмотров: 194
Matrix 32 Просмотров: 174
Matrix 33 Просмотров: 214
Matrix 34 Просмотров: 224
Matrix 35 Просмотров: 187
Matrix 36 Просмотров: 234
Matrix 37 Просмотров: 169
Matrix 38 Просмотров: 188
Matrix 39 Просмотров: 143
Matrix 40 Просмотров: 192
Matrix 41 Просмотров: 192
Matrix 42 Просмотров: 165
Matrix 43 Просмотров: 154
Matrix 44 Просмотров: 154
Matrix 45 Просмотров: 147
Matrix 46 Просмотров: 164
Matrix 47 Просмотров: 175
Matrix 48 Просмотров: 153
Matrix 49 Просмотров: 152
Matrix 50 Просмотров: 162
Matrix 51 Просмотров: 151
Matrix 52 Просмотров: 167
Matrix 53 Просмотров: 148
Matrix 54 Просмотров: 181
Matrix 55 Просмотров: 114
Matrix 56 Просмотров: 154
Matrix 57 Просмотров: 123
Matrix 58 Просмотров: 136
Matrix 59 Просмотров: 125
Matrix 60 Просмотров: 148
Matrix 61 Просмотров: 157
Matrix 62 Просмотров: 171
Matrix 63 Просмотров: 149
Matrix 64 Просмотров: 176
Matrix 65 Просмотров: 153
Matrix 66 Просмотров: 173
Matrix 67 Просмотров: 160
Matrix 68 Просмотров: 143
Matrix 69 Просмотров: 170
Matrix 70 Просмотров: 112
Matrix 71 Просмотров: 120
Matrix 72 Просмотров: 118
Matrix 73 Просмотров: 119
Matrix 74 Просмотров: 151
Matrix 75 Просмотров: 151
Matrix 76 Просмотров: 138
Matrix 77 Просмотров: 146
Matrix 78 Просмотров: 145
Matrix 79 Просмотров: 149
Matrix 80 Просмотров: 225
Matrix 81 Просмотров: 137
Matrix 82 Просмотров: 125
Matrix 83 Просмотров: 178
Matrix 84 Просмотров: 121
Matrix 85 Просмотров: 121
Matrix 86 Просмотров: 101
Matrix 87 Просмотров: 139
Matrix 88 Просмотров: 128
Matrix 89 Просмотров: 116
Matrix 90 Просмотров: 107
Matrix 91 Просмотров: 114
Matrix 92 Просмотров: 124
Matrix 93 Просмотров: 138
Matrix 94 Просмотров: 129
Matrix 95 Просмотров: 128
Matrix 96 Просмотров: 134
Matrix 97 Просмотров: 112
Matrix 98 Просмотров: 106
Matrix 99 Просмотров: 135
Matrix 100 Просмотров: 146

Комментарии

Чтобы написать комментарии вам нужно войти в систему или зарегистрироваться