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

создать двумерный массив размером NXM.Заполнить его произвольным обраом.найти разность первого и последнего элемента массива

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

    const

      n = 5;
      m = 5;
    var
      a: array[1..n, 1..m] of integer;
      i, j: integer;
    begin
      for i := 1 to n do
        for j := 1 to m do begin
          a[i, j] := random(100);
          write(a[i, j], ' ');
          if(j mod m = 0) then writeln;
        end;
      writeln('Разность первого и последнего эл. массива: ', a[1, 1] - a[n, m]);
    end.

Самые новые вопросы