3. Сделать массив А из 10 целых чисел, принадлежащих интервалу (-30; 80).

3. Сделать массив А из 10 целых чисел, принадлежащих интервалу (-30; 80). Вывести приобретенный массив на экран. Вычислить сумму элементов массива, значения которых превышают 30.

Задать свой вопрос
1 ответ
  1. begin
  2.    var arr := SeqRandomInteger(100, -30, 80).ToArray.Println;    
  3.    arr.Where(x -gt; x gt; 30).Sum.Println;
  4. end.

PascalABC.NET

Чернояров Леонид
Родной мой! СПАСИБО :3
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт