Когда и кем был создан компьютерный вирус? (кратко) ​

Объяснение:

Brain-первый вирус,появившийся в 1986 году. Он заражал пятидюймовые дискеты. Вирус был создан братьями Баситом и Амджадом Фаруком Алви. У них был компьютерный магазин в Пакистане.

// PascalABC.NET 3.2, сборка 1367 от 20.12.2016
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln('*** Исходный массив 9x6 ***');
  var a:=MatrRandom(9,6,-50,50); a.Println(4);
  Writeln(4*a.ColCount*'-');
  var kn:=a.Rows.SelectMany(x->x).Where(x->x<0).Count;
  var kp:=a.Rows.SelectMany(x->x).Where(x->x>0).Count;
  Writeln(kn,' отрицательных, ',kp,' положительных')
end.

Пример
*** Исходный массив 9x6 ***
 -47  37  23 -34 -33   0
 -17  -5  13  -9   0 -46
 -41  31  41 -30 -24  49
  39  50  13   4  19  14
 -17 -12 -24  22  -9 -44
 -27  17 -44 -35  -4  32
  26  -5  49  -7 -28 -25
 -15  -9  13  25 -26 -29
 -40 -24  -4  50  33 -45

31 отрицательных, 21 положительных

           int[] array = { 10, -5, 3, 2, 0, -1, 8, 0, 10, 3 };

           int[] nums = new int[2];

           foreach( int i in array)

           {

               if (i > 0) nums[0] += 1;

               else if (i < 0) nums[1] += 1;

           }

           Console.WriteLine($"Количество положительных элементов массива = {nums[0]}, отрицательных = {nums[1]}");

           Console.ReadKey();

Объяснение:

Инициализируем массив целых чисел и массив из двух элементов для кол-ва отрицательных и положительных чисел.

С цикла foreach проходимся по каждому элементу массива и проверяем отрицательный ли он или положительный. Результатом прибавляем единицу в соответствующую ячейку массива для подсчета отрицательных и положительных чисел.