Помогите написать лабу!! - VB

Узнай цену своей работы

Формулировка задачи:

В одномерном массиве, состоящем из п вещественных элементов, вычислить: • количество элементов массива, равных нулю; • сумму элементов массива, расположенных после минимального элемента.

Решение задачи: «Помогите написать лабу!!»

textual
Листинг программы
Private Sub Command1_Click()
Dim R!, C!, T!, st$
 
C = Val(InputBox("Вводим емкость С (ф)", , 100))
For R = 10 ^ 2 To 10 ^ 3 Step 10 ^ 2
T = R * C
st = st & R & " Om" & vbTab & "T=RC=" & T & vbLf
Next R
MsgBox st
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

5   голосов , оценка 3.8 из 5
Похожие ответы