Решение представлено во вложениях.
Язык: Pascal;
Примечание: индексация массива начинается с 0.
Первые два скриншота - сама программа. Остальные - демонстрация работы.
![I. Дан одномерный массив B[N], 0<N<100. Определите сумму всех нечетных чисел, расположенных на](/tpl/images/1743/2427/f80ad.jpg)
![I. Дан одномерный массив B[N], 0<N<100. Определите сумму всех нечетных чисел, расположенных на](/tpl/images/1743/2427/46147.jpg)
![I. Дан одномерный массив B[N], 0<N<100. Определите сумму всех нечетных чисел, расположенных на](/tpl/images/1743/2427/d1826.jpg)
![I. Дан одномерный массив B[N], 0<N<100. Определите сумму всех нечетных чисел, расположенных на](/tpl/images/1743/2427/5229a.jpg)
![I. Дан одномерный массив B[N], 0<N<100. Определите сумму всех нечетных чисел, расположенных на](/tpl/images/1743/2427/c163c.jpg)
