• Помогите пожалуйста решить 3 задание !! Пожалуйста!! Очень нужна помощь!!

    question img

Ответы 4

  • Это третье задание?
    • Автор:

      sampson
    • 6 лет назад
    • 0
  • Странный вопрос, право же. Конечно, третье.
  • Спасибо огромное !!!
  • PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018Внимание! Если программа не работает, обновите версию!begin  var n:=ReadInteger('Количество строк/столбцов в массиве:');  var a:=MatrRandom(n,n,-99,99);   a.Println(4); Writeln(4*a.ColCount*'-');  var (K,L):=ReadInteger2('Укажите номера столбца и строки:');  var e:=a[L-1,K-1];  Writeln('S=',a.ElementsByRow.Where(t->t<e).Sum)end.ПримерКоличество строк/столбцов в массиве: 7  79   9  98 -38  -9 -64 -69  90 -67 -76 -53 -83 -43  70  85  27  37  51 -75   9  98 -74 -39 -33  34  30 -61 -46 -81  59 -19 -40   3 -21 -71 -41 -21  18  -9  -2  25 -88  34 -84 -73  46 -14 -75 -37----------------------------Укажите номера столбца и строки: 5 2S=-172
  • Добавить свой ответ

Войти через Google

или

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

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

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