• Дан массив из n чисел. Составить программу для вычисления суммы элементов массива, имеющих чётные индексы. Паскаль

Ответы 1

  • // PascalABC.NET 3.3, сборка 1547 от 07.10.2017// Внимание! Если программа не работает, обновите версию!begin  var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;  Write('Сумма элементов с четными индексами ',      a.Where((x,i)->i.IsOdd).Sum)end.Примерn= 1381 6 -34 -33 -13 86 -14 -49 -28 -20 -93 5 -62Сумма элементов с четными индексами -5
  • Добавить свой ответ

Войти через Google

или

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

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

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