• В двумерном массиве 10х15 найти разность между максимальным и минимальным элементами массива, заданными случайным образом на интервале [-50;50]))))
    Пожалуйста!)))

Ответы 1

  • // PascalABC.NET 3.2, сборка 1353 от 27.11.2016// Внимание! Если программа не работает, обновите версию!begin  var a:=MatrRandom(10,15,-50,50); a.Println(4);  var amax:=-100;  var amin:=100;  foreach var x in a do    if x>amax then amax:=x    else      if x<amin then amin:=x;  Writeln('Amax-Amin=',amax-amin)end.Пример -29  24  36  45 -14  -2  35  36  27   5 -31  26   0 -43 -16  41  37 -35  -6   0 -27  28  13 -37 -40 -45  -6   7 -38 -26   6   6   4 -22 -43 -41  27 -50 -31 -50 -37 -10 -38  35 -27 -14   0 -42  34 -12 -24  40  42  48 -26  -6 -39  23  34 -19 -46 -23  23   3  49  13 -29 -29 -50 -25 -37  37  47  -7 -13  33  16  28  40  24   6 -15  24  24  48  16  15   6 -46  14  48 -46 -34  39  47  36  17  10  37  11 -36 -22 -42   9 -26 -10  44  -2  10  -9  29 -16  33 -40  26  20   4  49   5 -18  48  16 -33 -13 -23 -41  21 -43  -3   2 -34 -45  42 -21  10 -22 -23 -36   0   8  23 -33  46  13  36  14 -28 -44 -38 -24Amax-Amin=99
    • Автор:

      camryn
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years