
Convertir un numero a letras
Visual Basic.NET





Publicado el 11 de Enero del 2017 por Xavi (548 códigos)
33.806 visualizaciones desde el 11 de Enero del 2017
Este código muestra como convertir un numero sin decimales a letras


datos = enum_letras('Oscuridad para asuntos oscuros')
for letra, num in datos.iteritems():
cont = 'z' if (num < 2) else 'ces'
print 'La letra %s se repite %s ve%s' % (letra, num, cont)
La letra a se repite 4 veces
La letra c se repite 2 veces
La letra d se repite 2 veces
La letra i se repite 1 vez
La letra o se repite 4 veces
La letra n se repite 1 vez
La letra p se repite 1 vez
La letra s se repite 5 veces
La letra r se repite 3 veces
La letra u se repite 3 veces
La letra t se repite 1 vez
datos = enum_letras('Oscuridad para asuntos oscuros')
for letra, num in datos.items():
cont = 'z' if (num < 2) else 'ces'
print ('La letra %s se repite %s ve%s' % (letra, num, cont))
La letra t se repite 1 vez
La letra d se repite 2 veces
La letra u se repite 3 veces
La letra s se repite 5 veces
La letra a se repite 4 veces
La letra p se repite 1 vez
La letra c se repite 2 veces
La letra i se repite 1 vez
La letra r se repite 3 veces
La letra n se repite 1 vez
La letra o se repite 4 veces