función vbscript
dim a, b, c, d
a=inputbox("Ingrese el primer número")
b=inputbox("Ingrese el primer número) número" Dos números")
c=inputbox("Ingrese el tercer número")
si agt;=b y agt;=c entonces d=a
si bgt;=a y bgt;=c entonces d=b
si cgt;=a y cgt;=b entonces d=c
msgbox "El número más grande es" amp; d