Найти сумму квадратов положительных членов матрицы MXN

Отыскать сумму квадратов положительных членов матрицы MXN

Задать свой вопрос
Милана
какой язык?
Машенька
какой язык?
Василий Гилимович
какой язык?
Толик
какой язык?
1 ответ
PascalABC.NET 3.4.0, сборка 1672 от 10.06.2018
Внимание! Если программа не работает, обновите версию!

begin
  var (m,n):=ReadInteger2('Количество строк и столбцов в матрице:');
  Writeln('*** Исходная матрица ***');
  var a:=MatrRandom(m,n,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  Writeln('Сумма положительных ',a.ElementsByRow.Where(t-gt;tgt;0).Sum)
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт