Programación Vb online, urgente
¿privado? ¿Sub? Command1_Click()
¿Atenuar? a(1? ¿Dónde? 20)? Enteros
¿Para qué? ¿I? =?1?¿Adónde ir? 20
¿Un (yo)? =?Yo
s? =?s? +?Respuesta (1)
¿Siguiente? Yo
¿Para qué? ¿I? =?1?¿Adónde ir? 20
¿Y si? ¿Un(yo)? <? 10?Entonces
¿Imprimir? ¿Espacio(2)? y amplificador? ¿Un(yo)? y amplificador? Espacio(1);
Otro
¿Imprimir? ㈠;
¿Fin? Si
¿Y si? ¿I? Mod? 5? =? 0? ¿Y luego qué? Imprimir
¿Siguiente? Yo
imprimo
¿para qué? ¿I? =?20?¿Adónde ir? 1? -1
¿Y si? ¿Un(yo)? <? 10?Entonces
¿Imprimir? ¿Espacio(2)? y amplificador? ¿Un(yo)? y amplificador? Espacio(1);
Otro
¿Imprimir? ㈠;
¿Fin? Si
¿Y si? (¿Yo?-?1)?Mod? 5? =? 0? ¿Y luego qué? Imprimir
¿Siguiente? ¿Yo
imprimo
imprimo? "?suma = ";? s
¿Fin? Submarino