Encuentra todos los números de 7 dígitos hasta 100 y la suma de todos los números en VB.
Encuentra todos los números de 7 dígitos hasta 100 y la suma de todos los números.
¿Privado? ¿Sub? Command1_Click()
¿Imprimir? "Todos los números de 7 dígitos dentro del rango de 100"
¿Para qué? ¿I? =?0?¿Adónde ir? Nueve
¿Imprimir? ¿I? *?10?+?siete
s? =?s? +?(¿Yo?*?10?+?7)
Entonces
¿Imprimir? "¿La suma de todos los números?" y amplificador? s
¿Fin? Submarino