) , позволяющую:1. Ввести элементы представленных в Приложении A массивов в компьютер для последующей их обработки.2. Вывести элементы массивов на экран для проверки правильности их ввода.3. Третье задание взять по номеру варианта из Приложения B.приложение АЗначения элементов первого массива 5 4 -5 6 7 8 1Значения элементов второго массива 5 3 1 -7 -6 1 2приложение ВРасположить элементы первого массива по убыванию их значений, элементы второго массива по возрастанию, а затем создать третий массив, элементы которого будут равны сумме соответствующих элементов первых двух массивов.

using System;

using System.Collections.Generic;

using System.Linq;

using System.Numerics;

public class Program

{

   public static void Main(string[] args)

   {

       Console.WriteLine("Enter 12 integer numbers");

       var Arr = new List<int>();

       for (int i = 0; i < 12; i++)

       {

           Arr.Add(int.Parse(Console.ReadLine()));

       }

       Console.WriteLine($"Кол-во нулевых элементов: {Arr.Where(p => p == 0).Count()}");

       Console.WriteLine($"Positive numbers product: {Arr.Where(p => p > 0).Aggregate(BigInteger.One, (p, q) => p * q)}");

       Console.ReadKey();

   }

}

Объяснение:

Добавьте ссылку на сборку System.Numerics в вашем проекте для корректной работы программы. Иначе будет ругаться на несуществующее пространство System.Numerics

PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018Внимание! Если программа не работает, обновите версию!

begin

 var R := SeqRandomReal(ReadInteger('n='), -50, 50)

     .Select(t -> Round(t, 2)).ToArray;

 R.Println;

 var imin := R.IndexMin;

 var Q := R.Select(t -> t * R[imin]).ToArray;

 Q.Println; // если надо

 R[imin] := Q.Average;

 R.Println

end.

Пример

n= 7

30.94 -31.83 41.85 -42.56 34.33 19.38 1.88

-1316.8064 1354.6848 -1781.136 1811.3536 -1461.0848 -824.8128 -80.0128

30.94 -31.83 41.85 -328.2592 34.33 19.38 1.88