profile

Опубликовано 5 лет назад по предмету Информатика от Halk061102

Помогите пожалуйста, нужно составить программу в Паскале.
~~~~~~~~~~~~~
Создать матрицу n-го порядка, вида:

  1. Ответ
    Ответ дан raf1O5

    program raf105;

    const

     n = 10;

    var

     matrix: array[1..n,1..n] of integer;

    begin

     for var i:=1 to n do

     begin

       for var j:=1 to n do

       begin

         if j = n-i+1 then

           matrix[i,j]:= i

         else

           matrix[i,j]:= 0;

         write(matrix[i,j]:3,' ');

       end;

       writeln;

     end;

    end.

    PascalABC

  2. Ответ
    Ответ дан iolandavalerypad353

    Ответ:

    begin

     var m := ReadInteger();

     var a := MatrGen(m, m, (i, j)-> Ord(i + j = m - 1) * (i + 1));

     a.Println;

    end.

    Объяснение:

Войдите или зарегистрируйтесь, чтобы добавить ответ или свой вопрос на сайт


Другие вопросы
astafeva
Алгебра - 1 неделя назад

4x^5+5x^4-20x^3-25x^2+16+20=0решить

astafeva
Алгебра - 1 неделя назад

4x^5+5x^4-20x^3-25x^2+16+20=0решить

astafeva
Алгебра - 1 неделя назад

4x^5+5x^4-20x^3-25x^2+16+20=0решить

astafeva
Алгебра - 1 неделя назад

4x^5+5x^4-20x^3-25x^2+16+20=0решить

скляр
Биология - 1 неделя назад

Ген днк включает 300 пар нуклеотидов. какова длина, молекулярная масса гена и сколько аминокислот закодировано в нем


Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.