Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме 85 тыс рублей в месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 22.04.2015, 12:34   #1
ilfat11
Новичок
Джуниор
 
Регистрация: 22.04.2015
Сообщений: 2
По умолчанию Напишите пожалуйста програмку !!!

Visual Basic .
Одномерный массив из N элементов заполнить с клавиатуры целыми числами. Подчитать и вывести на экран количество отрицательных чисел , содержащихся в массиве


Вот то что я написал , но basic не вычисляет

Код:
Dim i As Integer
Private Sub Command2_Click()
k = 0
N = Val(Text1.Text)
For i = 0 To N - 1
If i < 0 Then k = k + 1
Picture2.Print k
End If
Next i
End Sub

Последний раз редактировалось Аватар; 22.04.2015 в 12:43.
ilfat11 вне форума Ответить с цитированием
Старый 22.04.2015, 13:47   #2
Stanislav
Квадрокоптерист
Участник клуба Подтвердите свой е-майл
 
Регистрация: 29.09.2007
Сообщений: 1,824
По умолчанию

Цитата:
Сообщение от ilfat11 Посмотреть сообщение
но basic не вычисляет
это не basic не вычисляет это вы не правильно бейсик написали
Я часть той силы, что вечно хочет зла, но вечно совершает благо..
Stanislav вне форума Ответить с цитированием
Старый 22.04.2015, 15:06   #3
Utkin
Старожил
 
Аватар для Utkin
 
Регистрация: 04.02.2009
Сообщений: 18,136
По умолчанию

Вы число вводите 1 раз. И вообще непонятно к чему Вы это там написали.
Маньяк-самоучка
Utkin появился в результате деления на нуль.
Осторожно! Альтернативная логика
Utkin вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме 85 тыс рублей в месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Напишите програмку в визуал студио на С++ Юрий 58 Visual C++ 3 14.12.2011 03:21
Напишите програмку в Delphi Razdolbam Помощь студентам 3 23.09.2010 12:49
Подкоректируйте програмку пожалуйста!!! VADOS2009-1 Помощь студентам 1 05.06.2009 01:59
Зацеите мою програмку пожалуйста. Vladya Софт 7 15.05.2009 11:39