Три разных целых положительных числа: найти сумму двух наименьших из них - VB

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

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

Напишите программу, запрашивающую три разных целых положительных числа и находящую сумму двух наименьших из них.

Решение задачи: «Три разных целых положительных числа: найти сумму двух наименьших из них»

textual
Листинг программы
  1. Dim a, b, c, d As Integer
  2. a = InputBox("")
  3. b = InputBox("")
  4. c = InputBox("")
  5. If a > b And a > c Then
  6. d = Int(b) + Int(c)
  7. End If
  8. If b > a And b > c Then
  9. d = Int(a) + Int(c)
  10. End If
  11. If c > a And c > b Then
  12. d = Int(a) + Int(b)
  13. End If
  14. MsgBox d

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


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

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

14   голосов , оценка 4.143 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы