Предмет: Информатика, автор: Avengerone

Создайте двумерный массив X, имеющий четыре строки и три столбца и найдите в нем максимальный по абсолютному значению элемент, а также укажите номер строки и столбца, содержащие этот элемент. Язык Паскаль.

Ответы

Автор ответа: Аноним
0
const
  m = 4;
  n = 3;

var
  a: array[1..m, 1..n] of integer;
  i, j, im, jm, mx, e: integer;

begin
  Randomize;
  mx := -1000;
  for i := 1 to m do
  begin
    for j := 1 to n do
    begin
      a[i, j] := Random(100) - 50;
      e := abs(a[i, j]);
      if mx < e then begin
        mx := e; im := i; jm := j
      end;
      write(a[i,j]:4)
    end;
    writeln
  end;
  writeln;
  writeln('Максимальный по модулю элемент a[', im, ';', jm, ']=', mx)
end.

Тестовое решение:

 -12 -36 -41
   7 -45  12
 -23  48   0
  -1  31  14

Максимальный по модулю элемент a[3;2]=48


Похожие вопросы
Предмет: Қазақ тiлi, автор: sarymbekovbatyrbek
СРОЧНО ПОЖАЛУЙСТА ПОМОГИТЕ ДАМ 90
БАЛЛОВ


Қымыз – қазақ халқының ұлттық тағамдарының ішіндегі ең бағалы
дастарқан дәмінің бірі. Ол тек қана бие сүтінен ашытылады. Қазақтың
ұғымында ең дәмді қымыз ысталған ыдыста сақталады. Қымызды ағаш
күбіге немесе торсыққа сақтайды. Ысталған қымыз тәтті болу үшін қымызға
жылқының қазысын немесе жалын салып қойып, көп піседі. Алғашқы
қымызды ауылдың қарияларын шақыртып таттыру рәсімі орындаған. Ол
ырымдар бие сүтінің мол болуын тілеуге, бата беруге арналған.
1. Алғашқы қымызды кім ішкен?
А) балалар
В) үй иесі
С) ауылдың қариялары
Д) бие сауған адам
2. Ең дәмді қымыз қандай ыдыста сақталады?
А) жуылған
В) ысталған
С) кең
Д) жаңа
3. Қымызды қайда сақтайды?
А) ағаш ыдыста
В) жаңа ыдыста
С) таза ыдыста
Д) кең ыдыста
4. «Таттыру» рәсімі неге арналған?
А) бие саууға
В) қымыз ішуге
С) қымызды сақтауға
Д) бата беруге
Предмет: Обществознание, автор: ierlycov