Необходимо составить программу в Paskal 039; e для нахождения суммы ряда

Нужно составить программку в Paskal ' e для нахождения суммы ряда нечётных чисел с внедрением for...to, где n - количество чисел, i - число для цикла, summa - сумма чисел.

Задать свой вопрос
Василиса Гамбас
Вводится с клавиатуры ряд чисел. Необходимо избрать нечётные и просуммировать?
Яна Канбай
с клавиатуры вводится n - rjkbxtcndj xbctk
Надежда Моничева
rколичество чисел
1 ответ
Summa:=0;
for i:=1 to n do
if a[i]mod 2 lt;gt;0 then summa:=a[i]+summa;
end.
Вакуловский Санек
надобно через тип Integer, а не через boolean, но всё одинаково спасибо
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт