Форум программистов, компьютерный форум, киберфорум
Наши страницы
Visual Basic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/10: Рейтинг темы: голосов - 10, средняя оценка - 4.60
Nancy91
0 / 0 / 0
Регистрация: 27.09.2010
Сообщений: 1
1

Заполнение массива InputBox

30.09.2010, 17:12. Просмотров 1877. Ответов 1
Метки нет (Все метки)

Вредный препод не хочет ставить 4 за зачет по РиэАИС. Буду очень благодарна за помощь, так как в информатике не сильна...

Заполните массив из десяти целых чисел положительными числами через поле ввода InputBox (используйте цикл For…Next). Если пользователь случайно ввел отрицательное значение или пустое, то об этом должно выдаваться сообщение и происходить выход из цикла. Если все числа, введенные пользователем положительные, то процедура должна подсчитать их сумму и вывести ее на экран.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
30.09.2010, 17:12
Ответы с готовыми решениями:

Заполнение массива (InputBox)
написал программу по заполнению массива с помощью Array, подсчета суммы...

Заполнение массива
Необходимо заполнить массив n*n по правилу 1 2 3 4 .. n 0 2 3 4 .. n 0 0 3 4...

Заполнение массива
Нужно вывести среднее значение одномерного массива размером 20 элементов,...

Заполнение массива
Здравствуйте! помогите решить задачу с массивом : 2. Проверить, сколько из 10...

Заполнение вектора из массива
Ребят помогите пожалуйста. Требуется разработать информационную технологию,...

1
Dzhej-Dzhej
Заблокирован
01.10.2010, 09:11 2
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Option Explicit
Dim sum As Integer, num As Integer
 
Private Sub Form_Load()
    Dim i As Integer
    On Error GoTo err
    sum = 0
    For i = 1 To 10
        num = InputBox("введите число")
        If (num <= 0) Then GoTo err
        sum = sum + num
    Next i
    MsgBox ("сумма = " + CStr(sum))
    End
    'Exit Sub
err:
    MsgBox ("некорректное число")
    End
End Sub
Nancy91, примерно так
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
01.10.2010, 09:11

Заполнение массива из цикла
Всем доброго времени суток. Совсем понемногу занимаюсь программированием на...

Заполнение одномерного массива
Помогите написать код заполнения одномерного массива значениями произведений...

Заполнение массива элементами последовательности
Дана последовательность: sin(1) / 1, sin(2) / 2, sin(3) /3 …sin(13) / 13....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru