Сделайте программу в паскале.Дан массив.Заполнить массив b элементами массива a,стоящими на

Сделайте программку в паскале.
Дан массив.Заполнить массив b элементами массива a,стоящими на четных местах

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

begin
  var n:=ReadInteger('n=');
  var a:=ArrRandom(n,-99,99); a.Println;
  var b:=new integer[n div 2];
  Range(1,n-1,2).ForEach(i-gt;begin b[(i-1) div 2]:=a[i] end);
  b.Println
end.

Пример
n= 11
-30 -1 -29 -7 11 45 23 -90 -28 96 -38
-1 -7 45 -90 96
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт