В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
olyavlas23
olyavlas23
14.03.2022 09:23 •  Информатика

Узнайте, верно это утверждение или нет. {Чтобы подготовить содержание материала, вы должны сначала определить заголовки и номера страниц в тексте.}
а) правда
б) ложь

Показать ответ
Ответ:
Lulu8080
Lulu8080
30.05.2021 16:43
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger('Количество строк в массиве:');
  var m:=ReadInteger('Количество столбцов в массиве:');
  Writeln('*** Исходный массив [',n,',',m,'] ***');
  var a:=MatrRandom(n,m,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  var a1:=a[0,0];
  Writeln('S=',a.ElementsByRow.Skip(1).Where(x->x>a1).Sum)
end.

Пример
Количество строк в массиве: 4
Количество столбцов в массиве: 5
*** Исходный массив [4,5] ***
  35  24  93 -58 -89
 -51 -55 -83  49 -92
 -90  89  68  28 -60
  46 -57  53 -78 -42

S=398
0,0(0 оценок)
Ответ:
linabananchik
linabananchik
30.05.2021 16:43
Using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;

namespace СиШарп
{
    class Program
    {
        static void Main(string[] args)
        {
            Console.Write("m = ");
            int m = int.Parse(Console.ReadLine());
            Console.Write("n = ");
            int n = int.Parse(Console.ReadLine());
            Console.WriteLine("A({0},{1}):",m,n);
            int[,] A = new int[m,n];
            Random rand = new Random();
            double S = 0;
            for(int i = 0; i < m; i++)
            {
                for(int j = 0; j < n; j++)
                {
                    A[i, j] = rand.Next(-10, 10);
                    Console.Write("{0,3} ",A[i,j]);
                    if (A[i, j] % 2 == 0) S += A[i, j];
                }
                Console.WriteLine();
            }
            Console.WriteLine("S = {0}",S);
            Console.ReadKey();
        }
    }
}
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота