Дан массив размера N. Заполнить его случайными числами - VB
Формулировка задачи:
Здравствуйте=))) Помоги пожалуйста решить задачки, я совсем Visual Basic не понимаю =(((
Дан массив размера N. Заполнить его случайными числами в диапазоне от -10 до 10 и определить количество участков, на которых его элементы монотонно возрастают.
Решение задачи: «Дан массив размера N. Заполнить его случайными числами»
textual
Листинг программы
Dim A() N = 10 ReDim A(1 To N) For i = 1 To N A(i) = Int(Rnd * 20) - 10 Next i Count = 1 For i = 2 To N If A(i) < A(i - 1) Then Count = Count + 1 Next i