Вычислить сумму и произведение элементов массива имеющих четный номер - 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

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

9   голосов , оценка 4 из 5
Похожие ответы