Вычислить сумму и произведение элементов массива имеющих четный номер - VB
Формулировка задачи:
Имеется одномерный массим X(N). Вычислить сумму и произведение элементов массива имеющих четный номер. Массив X(N) вывести на печать.
Решение задачи: «Вычислить сумму и произведение элементов массива имеющих четный номер»
textual
Листинг программы
- otvet=""
- for i=1 to N-1
- otvet = otvet & X(i) & "; "
- next i
- otvet = otvet & X(i)
- s=0
- p=1
- for i =2 to N step 2
- s=s+X(i)
- p=p*X(i)
- next i
- otvet=otvet & vbcrlf & "Сумма четных = " & s
- otvet=otvet & vbcrlf & "Произ. четных = " & p
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
