Если рядом равные элементы, то вставить между ними ноль
Если рядом равные элементы, то вставить между ними ноль 2009-12-11 07:00 Александр Если рядом равные элементы, то вставить между ними ноль Public Sub Label1_Click) Form1.Cls Dim n As Byte n = Combo1.Text ReDim a(1 To n) As Integer Print "array A(n" For i = 1 To n a(i) = Rnd * 10 - 5 Form1.Print "a"; i; "; a(i) Next i Dim b) As Integer s = 0 For i = 1 To n-1 s=s+1 ] ...
Программирование на Visual Basic, VB .NET и VBA
Разделы форума: Visual Basic 6.0 Microsoft VB.Net Visual Basic for Applications (VBA) Visual Basic FAQ Другие рассылки, подпишись: Анекдот на каждый день | Видео юмор - смешное бесплатное онлайн видео | Фото Тюмени - фотографии города Тюмень Скачать: Visual Basic , ActiveX , MSDN , видео уроки , утилиты , модули , книги по программированию Форум: Программирование на Visual Basic делает анонс свежих тем. Если у Вас есть вопросы - задавате их на нашем форуме. Не умеете решать задачи? Нужно решить курсовую? З...