Заполнить массив а [1..12] случайными целыми числами в диапазоне от 1 до 20 и вывести
Заполнить массив а [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
Не нашли ответ?
Похожие вопросы