Найти произведение чисел кратных 7 от 1 до 50 - VB

Узнай цену своей работы

Формулировка задачи:

Найти произведение чисел кратных 7 от 1 до 50

Решение задачи: «Найти произведение чисел кратных 7 от 1 до 50»

textual
Листинг программы 
s=1
for i=1 to 100
if i mod 7 = 0 then s=s*i
next i
msgbox s

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

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

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

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