Количество положительных чисел - VB

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

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

Подсчитать количество положительных чисел среди чисел a, b, c.

Ну вы догадались все о чём я

Решение задачи: «Количество положительных чисел»

textual
Листинг программы
Private Sub Command1_Click()
a = -5.2: b = 0: c = 8.4
r! = (a > 0) + (b > 0) + (c > 0)
MsgBox a & " ; " & b & " ; " & c & vbNewLine & "полож.->   " & -r
End Sub

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


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

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

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