Escriba una declaración de bucle en script VB para escribir un archivo de red: ¡Cuente 1! 2! 3! ... la suma de n!

lt; lenguaje de escritura=vbscriptgt;

sub js()

dim n, x, y, i

x=1

n=inputbox("Ingrese el valor de N")

si nlt;gt;"" entonces

para i=1 a n

x= i*x

y=y x

msgbox "1! 2! 3! ... n!=" amp;

fin si

fin sub

lt /scriptgt

lt; tipo de entrada="botón" nombre="js" id="js " value="Calcular la suma de..." onclick="js()"gt;