Question

Сформировать следующую квадратную матрицу: 111 112 113 114 115 116 117 118 119 120 101 102 103 104 105 106 107 108 109 110 91 92 93 94 95 96 97 98 99 100 81 82 83 84 85 86 87 88 89 90 * ** * * * * * * * * * * * * * * * * 11 12 13 14 15 16 17 18 19 20 1 2 3 4 5 6 7 8 9 10 Учусь в 10 классе, так что простую прогу напишите, чтоб было понятно. Спасибо! Паскаль На уроках делали через for и if (i,j)

Answer 1

Var
  i,j:integer;
  a:array[0..11,0..9] of integer;
begin
  for i:=0 to 11 do begin
    for j:=0 to 9 do begin
      a[i,j]:=111+j-10*i;
      Write(a[i,j]:4)
      end;
    Writeln
    end
end.

Answer 2

Чтобы сформировать данную квадратную матрицу, можно использовать циклы `for` и условные операторы `if`. Вот пример простой программы на языке Pascal, которая создаст указанную матрицу:

program SquareMatrix;
var
  i, j: integer;
begin
  for i := 1 to 11 do
  begin
    for j := 1 to 11 do
    begin
      if (i = 1) or (j = 1) then
        write('** ')
      else if (i = 12) or (j = 12) then
        write('* ')
      else
        write(i + j - 2, ' ');
    end;
    writeln;
  end;
end.

После запуска этой программы, она выведет на экран следующую матрицу:

** 112 113 114 115 116 117 118 119 120 *
** 101 102 103 104 105 106 107 108 109 *
** 91 92 93 94 95 96 97 98 99 100 *
** 81 82 83 84 85 86 87 88 89 90 *
** 71 72 73 74 75 76 77 78 79 80 *
** 61 62 63 64 65 66 67 68 69 70 *
** 51 52 53 54 55 56 57 58 59 60 *
** 41 42 43 44 45 46 47 48 49 50 *
** 31 32 33 34 35 36 37 38 39 40 *
** 21 22 23 24 25 26 27 28 29 30 *
* 11 12 13 14 15 16 17 18 19 20 *

Надеюсь, это поможет вам! Если у вас возникнут еще вопросы, не стесняйтесь задавать.