Вопрос по информатике:
Нужно сделать в VBA сумму вот такого ряда через Do While 1-2+3-4+5-6...-100. Сколько пытался, не получается, помогите, пожалуйста
- 12.07.2015 19:15
- Информатика
- remove_red_eye 12058
- thumb_up 47
Ответы и объяснения 1
Sub aaa()
s = 0: sign = 1
i = 1
Do While i <= 100
s = s + sign * i
sign = -sign
i = i + 1
Loop
MsgBox s
End Sub
В результате будет получено значение -50.
- 13.07.2015 05:38
- thumb_up 1
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.