Сформируйте массив, содержащий 15 элементов, с помощью датчика случайных чисел.
Получите новый массив, каждый элемент которого равен удвоенному соответствующему элементу исходного массива . В полученном массиве найдите максимальный элемент среди элементов, номера которых кратны трем. Выведите на экран исходные и полученные результаты.
<em>// PascalABC.NET 3.3, сборка 1573 от 04.11.2017</em> <em>// Внимание! Если программа не работает, обновите версию!</em>
begin var n:=15; var a:=ArrRandom(n,-49,49); a.Println; var b:=a.Select(t->2*t).ToArray; b.Println; var max:=Range(3,n,3).Select(i->b[i-1]).Max; Writeln('Искомый элемент: ',max) end.