Составить метод и написать программку. Получить 15 целых чисел на промежутке

Составить метод и написать программу. Получить 15 целых чисел на промежутке (50;150). Сколько выпало трехзначных чисел.

Задать свой вопрос
1 ответ
// PascalABC.NET 3.2, сборка 1443 от 19.05.2017
// Внимание! Если программка не работает, обновите версию!

begin
  var a:=ArrRandom(15,50,150); a.Println;
  Writeln('Трехзначных: ',a.Where(x-gt;xgt;99).Count)
end.

Пример
132 53 120 100 143 148 125 78 150 141 50 138 72 109 59
Трехзначных: 10
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт