• найти сумму индексов нечетных т элементов массива.

Ответы 4

  • А есть ли смысл для школьника писать программу на версии языка, которую их школьный Паскаль врядли поймёт? А автор вопроса тем более. Я вот нифига не понимаю) Я не из вредности спрашиваю... Из любопытства
  • Печально, что Вам невдомек: данная версия Паскаля - PascalABC.Net 3.x - уже давно используется во множестве школ.
  • Ясно. Видимо мы в этом плане устарели. Спасибо за ответ.
    • Автор:

      spot
    • 6 лет назад
    • 0
  • // PascalABC.NET 3.2, сборка 1338 от 16.11.2016begin  var a:=ArrRandom(ReadInteger('n='),1,50); a.Println;  var s:=0;  for var i:=0 to a.Length-1 do    if a[i].IsOdd then s+=i+1;  Writeln('Сумма индексов нечетных элементов равна ',s)end.Примерn= 1330 22 20 40 37 11 12 44 31 46 37 4 44Сумма индексов нечетных элементов равна 31
    • Автор:

      ignacio
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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