Red de conocimiento informático - Problemas con los teléfonos móviles - Programación Vb online, urgente

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