Даны три разных числа. Найти среди них произведение и количество отрицательных - VB

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

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

Пожалуйста помогите!!! Даны три разных числа. Найти среди них произведение и количество отрицательных.

Решение задачи: «Даны три разных числа. Найти среди них произведение и количество отрицательных»

textual
Листинг программы
a = InputBox("a=")
b = InputBox("b=")
c = InputBox("c=")
MsgBox "Произведение трёх чисел = " & a * b * c & vbLf & "Из них отрицательных: " & -(a < 0) - (b < 0) - (c < 0)

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


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

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

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