Дано три числа. Найти сумму двух наибольших из них - VB
Формулировка задачи:
дано три числа.найти сумму двух наибольших из них.
Решение задачи: «Дано три числа. Найти сумму двух наибольших из них»
textual
Листинг программы
sub main
a=1 'cdbl(inputbox("a="))
b=2
c
if a<=b and a<=c then
msgbox b+c
elseif b<=c and b<=a then
msgbox a+c
else
msgbox b+a
endif
end sub