---PascalABC.NET 3.6.2 ---
begin
//Создадим переменную A типа List<integer>, задав в конструкторе ёмкость в 20 элементов;
var A : List<integer> := New List<integer>(20);
A.AddRange(SeqGen(A.Capacity, p -> Random(-10, 10))); //Запишем в наш List последовательность, длина которой равна List<T>.Capacity, и каждый элемент в которой генерируется случайно в диапазоне [-10; 10]
A.Println; //Распечатаем в консоль содержимое A
end.
Объяснение:
Заместо стандартного паскалевского массива использован класс List<T> библиотеки .NET Framework, являющийся аналогом обычного массива, но имеющий большее число методов для работы с ним.
А вообще, программа может быть написана в 1 строку:
begin
ArrRandom(20, -10, 10).Println;
end.
2 Вести массив А(36). найти произведение первых пяти элементов массива, сумму остальных и частное от деления произведения и суммы. вывести все результаты.
1) при цикла найти минимальное значение.
2) записать значение минимума в отдельную переменную.
3) при цикла каждый элемент проверять на четность, если элемент четный, то тогда переходить к следующему, а если он не четный, то приравнивать его к переменной в которой записан минимум.
1) при цикла ограниченным до 5ого элемента включительно любую объявленную переменную и заранее приравненную к единице умножить поэлементно(при цикла)
2) начиная с 6 элемента и до конца при цикла сложить все элементы и записать эту сумму в отдельную объявленную переменную
3)записать в объявленную переменную выражение произведение/сумму.
4) вывести все переменные на экран.