Имеется массив из 25 случайных чисел. Получить новый массив из положительных

Имеется массив из 25 случайных чисел. Получить новый массив из положительных значений первого, 1-ый массив числа от -10 до +10

Задать свой вопрос
2 ответа
// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программка не работает, обновите версию!

begin
  var a:=ArrRandom(25,-10,10); a.Println;
  a:=a.Where(t-gt;tgt;0).ToArray; a.Println
end.
Ничего трудного.
P.S. Работает на 11 стандарте и ниже, на счёт 14 и 17 не уверен.
UPD: Проверил на 14 и 17 стандарте, работает!
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт