Запол­нить массив а [1..12] случайными целыми чис­лами в диапазоне от 1 до 20 и вывести на экран элементы массива со значениями, кратными 6 и большими 15

На интервале [1;20] кратно 6 и больше 15 только число 18. // PascalABC.NET 3.2, сборка 1338 от 16.11.2016 begin   var a:=ArrRandom(12,1,20); a.Println;   a.Where(x->(x>15) and (x mod 6=0)).Println end. Результат 4 6 5 13 9 3 4 17 20 11 18 2 18