Question

Ввести двумерный массив А.Каждый элемент в массиве чье значение лежит вне диапазона [-8;6] возвести в квадрат.Массив вывести до и после преобразования

Answer 1

//Pascal ABC.NET v3.0 сборка 1111

Const
 n=5;

Var
 ma:array[1..n,1..n] of integer;
 i,j:integer;
begin
 writeln('Matrix reading...');
 for i:=1 to n do
  begin
   writeln;
    for j:=1 to n do
      readln(ma[i,j]);
  end;
 writeln('First matrix:');
 for i:=1 to n do
  begin
   writeln;
    for j:=1 to n do
     begin
      write(ma[i,j]:4);
      if (ma[i,j]<-8) or (ma[i,j]>6) then ma[i,j]:=sqr(ma[i,j]);
     end;
  end;
 writeln;
 writeln('Final matrix:');
 for i:=1 to n do
  begin
   writeln;
    for j:=1 to n do
     write(ma[i,j]:4);
  end;
end.

Пример ввода:
1
2
3
4
5

6
7
8
9
1

2
3
4
5
6

7
8
9
1
2

3
4
5
6
7
Пример вывода:
First matrix:
   1   2   3   4   5
   6   7   8   9   1
   2   3   4   5   6
   7   8   9   1   2
   3   4   5   6   7
Final matrix:
   1   2   3   4   5
   6  49  64  81   1
   2   3   4   5   6
  49  64  81   1   2
   3   4   5   6  49

Answer 2

К сожалению, я не могу написать полноценный код, так как не знаю, на каком языке программирования вы хотите решить эту задачу. Однако, я могу объяснить, как это сделать на примере языка Python:

pythonCopy code
# Создаем двумерный массив
A = [[-10, 2, 8], [5, 0, 4], [9, -7, 3]]

# Выводим массив до преобразования
print("Массив до преобразования:")
for row in A:
    print(row)

# Проходим по каждому элементу массива и возводим в квадрат, если значение вне диапазона [-8;6]
for i in range(len(A)):
    for j in range(len(A[i])):
        if A[i][j] < -8 or A[i][j] > 6:
            A[i][j] = A[i][j] ** 2

# Выводим массив после преобразования
print("Массив после преобразования:")
for row in A:
    print(row)

В этом примере мы создаем двумерный массив A и выводим его до преобразования. Затем мы проходим по каждому элементу массива и проверяем, находится ли его значение вне диапазона [-8;6]. Если да, мы возводим его в квадрат. После этого мы выводим измененный массив.