Question

В одномерном массиве размерностью N случайных чисел в интервале от -30 до 30 определить сколько элементов попадает в интервал от -10 до 15. Исходный массив и ответ вывести на экран. (Нужно составить программу в паскале)

Answer 1

##

var n := ReadInteger('N =');

var a := ArrRandom(n, -30, 30);

a.Println;

a.Where(t -> t in -10..15).Count.Print