Ребят,я,видимо,не понимаю какую-то простую вещь,которая лежит в принципах циклов:
Пишу программу,которая считает 10 элементов,поместит их в массив,отсортирует чётные/нечётные и выдаст их сумму.
Код:
For i=1 To 10'Цикл вывода сообщения о вводе элемента массива
TextWindow.WriteLine("Введите "+i+" элемент массива")
a[i]=TextWindow.ReadNumber()
EndFor
For i=1 To 10'Цикл создания массива из целых частей после деления на 2
b[i]=Math.Remainder(a[i],2)
EndFor
For i=1 To 10'Цикл условий на остаток и суммы
If b[i]=0 Then
For i=1 To 10
s=0
s=s+a[i]
EndFor
Else
For i=1 To 10
k=0
k=k+a[i]
EndFor
EndIf
EndFor
TextWindow.Write("Сумма чётных="+s)
TextWindow.Write("Сумма нечётных="+k)
Проблема в том,что в итоге программа выводит только последние чётные/нечётные элементы массива.
Мои попытки устранить проблему:
1)Я ввёл новый массив b[i],в который помещается остаток от деления a[i] элемента массива.
2)Теперь в каждом условии свой цикл
Всё это не помогло. Что я не понимаю?
