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
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