Поделитесь своими знаниями, ответьте на вопрос:
1. Напишите программу к задаче: Дан массив В (60), заполненный двузначными случайными числами. Найти максимальный элемент массива и вывести его на экран. 2. Напишите программу к задаче: Дан массив А (120), заполненный трехзначными случайными числами. Найти произведение тех элементов, которые принадлежат отрезку (30, 60) и сумму тех элементов, которые кратны 6.
Задание 1:
## var B := ArrRandom(60, 10, 99); B.Println; Print('Максимальный элемент:', B.Max)Задание 2:
## var A := ArrRandom(120, 100, 999); A.Println; Println('Произведение:', A[30:59].Product); Print('Сумма:', A.Where(x → x.Divs(6)).Sum)