Заполните массив 30 числами сколько чисел находится в интервале от 0 до 6

Заполните массив 30 числами сколько чисел находится в интервале от 0 до 6
Гость
Ответ(ы) на вопрос:
Гость
// PascalABC.NET 3.1, сборка 1230 от 27.04.2016 begin   var a:=ArrRandom(30,1,30); a.Println;   Writeln('Кол-во чисел на [1;6]: ',a.Where(x->x in [1..6]).Count) end. Тестовое решение 26 2 14 24 25 30 1 19 19 12 13 14 21 7 20 8 26 12 14 1 2 30 23 8 9 19 6 16 16 22 Кол-во чисел на [1;6]: 5
Не нашли ответ?
Ответить на вопрос
Похожие вопросы