• Программы на паскале.
    1.Из одномерного массива, состоящего из n целых элементов сформировать новый массив, состоящий только из положительных четных элементов больших 13 и меньших 23.
    2. Сформировать новый массив, состоящий сначала из положительных четных элементов больших 13 и меньших 23, а затем из оставшихся элементов.

Ответы 2

  • PascalABC.NET
  • begin

     var a := ReadArrInteger(ReadInteger);

     var b := a.Where(x -> x.isEven and x.inRange(13, 23)).Println.ToArray;

     var c := a.Where(x -> not (x.isEven and x.InRange(13, 23)))

     .Println.ToArray

    end.

    answer img
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years