Даны три числа. Выведите ** экран их значения и определите большее и меньшее из них.В...

Question

Даны три числа. Выведите на экран их значения и определите большее и меньшее из них.
В формате VBS

Answer 1

A = InputBox("Введите a")
min=a
max=a
b = InputBox("Введите b")
if bif b>max then max=b
c = InputBox("Введите c")
if cif c>max then max=c
MsgBox "Наибольшее: "+max+"; наименьшее: "+min