Нужно решить задание по информатике (срочна)

@vikoula · Регистрация: 25.10.2010

Author24 — интернет-сервис помощи студентам

Доброго время суток!
Помогите пожалуйста решить задачку по информатике!
Очень надо на завтра!
2 кнопки первоы Ввести 10 чисел а вторая Вычислить количество положительных и отрицательных чисел !!!

Visual Basic

Dim b(1 To 10) As Single 
Private Sub CmdVvod_Click() 
Dim i As Byte 
MsgBox "Введите десять чисел", vbOKOnly + vbInformation 
For i = 1 To 10 
b(i) = Val(InputBox("Введите" + Str(i) + "число", "Ввод числа")) 
Next 
End Sub

а дальше я не знаю =( помогите плиз .....

@PB · 01.11.2010, 20:40

Если срочнА, то сюда https://www.cyberforum.ru/freelance/

@кот Бегемот · 02.11.2010, 01:18

PB, не стоит брать на себя функции модераторов.

@PB · 02.11.2010, 13:23

Не по теме:

А я не беру на себя функции модераторов.
Если бы заголовок темы имел вид Нужно решить задание по информатике (срочно), то моего поста не было бы в этой теме.
Я не думаю что это опечатка.

@PB Просто прогер 1292 / 1079 / 13 Регистрация: 13.03.2009 Сообщений: 2,502
	01.11.2010, 20:40	2
	Если срочнА, то сюда https://www.cyberforum.ru/freelance/ 0

@кот Бегемот Платежеспособный зверь 8956 / 4382 / 1649 Регистрация: 28.10.2009 Сообщений: 11,623
	02.11.2010, 01:18	3
	PB, не стоит брать на себя функции модераторов. 0

@PB
	02.11.2010, 13:23 Нужно решить задание по информатике (срочна) #4
	Не по теме: А я не беру на себя функции модераторов. Если бы заголовок темы имел вид Нужно решить задание по информатике (срочно), то моего поста не было бы в этой теме. Я не думаю что это опечатка. 0