Определение произведения абсолютных значений элементов одноименного массива и его анализ. Математическое описание расчета суммы элементов последних столбцов матрицы определенной размерности. Алгоритмизация и программирование решения поставленной задачи.
Аннотация к работе
Программирование Private Sub Command1_Click() Dim X() As Single Dim i As Integer Dim P As Single Dim j As Single j = InputBox(BBEDITE J) ReDim X(1 To j) P = 1 For i = 1 To j X(i) = InputBox(BBEDITE X) P = P * Abs(X(i)) Next Print P= & P End Sub 4.