Programación para contar el número de narcisos
¿privado? ¿Sub? form_click()
¿Atenuado? ¿s? ¿Como? Entero
Cls
¿Imprimir? "El número requerido de narcisos es:";
¿Para qué? ¿I? =?100?¿Adónde ir? 500
¿Y si? ¿I? =?(¿Yo?Mod?10)?? 3?+?((Yo?Mod?100)?\?10)?? 3?+?(Yo?\?100)?? 3?Entonces
s? =?s? +?I
¿Imprimir? Yo;
¿Fin? ¿Y si
Siguiente? Yo
imprimo
¿imprimo? ¿Cuál es su suma? y amplificador? s
¿Fin? Submarino