Запол­нить массив а [1..12] случайными целыми чис­лами в диапазоне от 1 до 20 и вывести...

Question

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

Comments

Ктотрые?

---

Это что за язык?

---

Вы недавно написали слово "ктотрые", вот я вас и спрашиваю что это за слово такое, у вас проблемы со зрением ? Вот только что слово "читеть", расскажите мне что это за слово?

---

Ладно, прощайте у меня куча дел

---

Научитесь читать! :)

Answer 1

На интервале [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