Programación Vb entrada múltiplos del entero 7.
¿oscuro? r? ¿Como? Largo
¿Oscuro? ¿Suma? ¿Como? Largo
¿Oscuro? ¿Bandera? ¿Como? Largo
¿Para qué? r? =?1?¿Adónde ir? 100
¿Y si? r? mod? 5?=?0?o? r? mod? 7?=?0?Entonces
¿Depurar.Imprimir? r? y amplificador? VbTab
¿Y si? ¿Bandera? mod? 5?=?0?Entonces
Depurar.Imprimir
¿Fin? Si
lFlag=lFlag+1
lSum=lSum? +?Raro
¿Fin? si
entonces
debug.print? ¿Cuál es la suma de todos los múltiplos de 5 o 7 entre 1 y 100? y amplificador? lSuma