Общее количество осадков, выпавших за год - VB
Формулировка задачи:
Создать проект заполнения данного массива с клавиатуры и вывести на форму: Общее количество осадков, выпавших за год.
написал вот такой код, но он что-то не то делает
null
Решение задачи: «Общее количество осадков, выпавших за год»
textual
Листинг программы
- Dim Y, X, S
- Randomize
- Do While Y < 12
- Y = Y + 1
- X = InputBox("введите количество осадков в " & Y & " месяце", "Ввод данных", Int(50 * Rnd + 10))
- S = S + Val(X)
- Loop
- MsgBox S / 12
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
