Разработайте приложение для обработки двумерного массива в среде программирования VISUAL BASIC.

дан массив x(15). Найти произведенияя отрицательных и положительных элементов массива P1 и P2. Определить. что больше по абсолютной величине Р1 или Р2. Вариант №2

Тебе нужно будет форму создать с элементами.Код примерно так будет выглядеть:Dim X(15) As IntegerDim P1, P2 As IntegerFor i = 1 To 15   X(i) = Int(Rnd * 20) - 10   If X(i) > 0 Then P1 = P1 + 1   If X(i) < 0 Then P2 = P2 + 1   ИМЯ_ЭЛЕМЕНТА_ДЛЯ_МАССИВА=ИМЯ_ЭЛЕМЕНТА_ДЛЯ_МАССИВА & X(i) & " "Next iИМЯ_ЭЛЕМЕНТА_ДЛЯ_P1 = P1ИМЯ_ЭЛЕМЕНТА_ДЛЯ_P2 = P2If P1 > Abs(P2) Then MsgBox ("Сумма положительных больше модуля суммы отрицательных")If P1 < Abs(P2) Then MsgBox ("Модуль суммы отрицательных больше суммы положительных")