... la funcion! :¬¬ :xD
Consiste en convertir de la forma mas corta posible un numero decimal a su version romana... por ejemplo:
200 -> CC
1337 -> MCCCXXXVII
Espero que al menos una persona se digne a participar.. si no sera un fiasco, y destrozara mi ilusion de crear retos en el futuro :-( :-( :laugh:
I saludo! ;)
Supongo que consideramos válido el resultado solo hasta 3999 no? porque no tengo manera de escribir una línea sobre la letra si me paso de eso :xD
Tengo que tener puesto el input()?
Saludos
Si, solo hasta el 3999... y si, tambien has de añadir un input() :)
No se por que, pero se me hace que tienes algo mucho más corto :¬¬
No he controlado es que los números no sean mayores a 3999, pero no creo que sea necesario mientras funcione para los de abajo :xD
n=input()
s=1000,500,100,50,10,5,1
l='MDCLXVI'
r=''
for i in range(7):
if n>s[i]:
r+=n/s[i]*l[i]
n%=s[i]
print(r)
No sabía si contaban tabulaciones y saltos de línea, así que tal vez podría ahorrarme un par de caracteres :xD
Saludos
Muy bueno :)
Doy un par de dias y si nadie mas se anima a participar pongo mi super codigo :laugh: :laugh:
Un saludo :D
Eso quiere decir que tienes uno más corto? cuanto más corto?
Ese lo hice en un rato, ya vas a ver! >:D
Lo hice en batch (ya saben, me gustan los retos :rolleyes: )
@Echo Off
Setlocal enabledelayedexpansion
Title Number to Roman Conversion
::Coded by SmartGenius
Set "R=1"
Set "R_1=. M MM MMM"
Set "R_2=. C CC CCC CD D DC DCC DCCC CM"
Set "R_3=. X XX XXX XL L LX LXX LXXX XC"
Set "R_4=. I II III IV V VI VII VIII IX"
:Input
Set /p "N=Enter Number > "
If Not Defined N Cls & Goto :Input
If 0 GEQ %N% (Echo.Fuera de Rango&Goto :Input)
If 3999 LSS %N% (Echo.Fuera de Rango&Goto :Input)
:Split
Set /a "M_O=N%%10"
Set /a "M_T=(N%%100)-M_O"
Set /a "M_C=(N%%1000)-(M_T+M_O)"
Set /a "M_M=N-(M_C+M_T+M_O)"
:Convert
Set "Sp= %M_M:~0,1%%M_C:~0,1%%M_T:~0,1%%M_O:~0,1%"
:R_to_N
If 5 EQU %R% (Set "RF=!RF:.=!"&Goto :Show)
Set /a "T=!Sp:~%R%,1!+1"
For /f "tokens=%T%" %%b in ('Echo.!R_%R%!') do (Set "RF=!RF!%%b")
Set /a "R+=1"
Goto :R_to_N
:Show
Echo. Number = %N%
Echo. Roman = %RF%
Echo.
Pause
Exit
Aunque obviamente con las capacidaddes de los otros lenguajes se hace mas corto el codigo xD
Saludos.
Pongo una versión recursiva un poco más corta:
x=1000,500,100,50,10,5,1
c='MDCLXVI'
def f(n,p):
return n/x[p]*c[p]+f(n%x[p],p+1)if n else''
print f(input(),0)
Son 113 carácteres según wc.
soy novato en python, pero una idea posible seria usar una base de datos, y que revise ahí :huh:
Cita de: lucasfava en 17 Diciembre 2010, 16:02 PM
soy novato en python, pero una idea posible seria usar una base de datos, y que revise ahí :huh:
No sé yo, probablemente uses mas carácteres creando la conexión y ejecutando la consulta que de otra forma.
De todas formas, no creo que eso valga.
Muy buena, SmartGenius! y en batch :o
Los codes que pusieron en Python no funcionan :-X Para ciertos valores dan resultados erroneos. Por ejemplo, al introducir como dato 1999 devuelve como resultado MDCCCCLXXXXVIIII cuando la respuesta correcta es MCMXCIX.
Saludos y disculpen las molestias >:D
Como dice BeetleJuice vuestros codigos dan resultados equivocados... el de Novlucker, por ejemplo, dice que 1000 es DD, siendo M en realidad...
Cita de: Karcrack en 17 Diciembre 2010, 21:00 PM
Como dice BeetleJuice vuestros codigos dan resultados equivocados... el de Novlucker, por ejemplo, dice que 1000 es DD, siendo M en realidad...
Y por que no lo dijiste antes? :¬¬ lo probaste tanto como yo, vi que funcionaba para 1337 y listo :xD
Saludos
:laugh: Pues ale! A arreglarlo! Yo voy a ver si consigo acortar mi super codigo juasjuas >:D :xD
Que nadie diga que no soy práctico :laugh:
n=input()
s=1000,900,500,400,100,90,50,40,10,9,5,4,1
l='M','CM','D','CD','C','XC','L','XL','X','IX','V','IV','I'
r=''
for i in range(13):
if n>=s[i]:
r+=n/s[i]*l[i]
n%=s[i]
print(r)
También puedo ganar algunos caracteres haciendolo de manera recursiva como ghastlyX, pero la verdad pierde la gracia copiarle a los demás :¬¬
Saludos
Entonces cuál es el super código más corto?
Perdon, se me murio el portatil, y he tenido que comprar otro... asi que bueno, hasta que vuelva a organizar el PC no sere capaz de reprogramar la funcioncita... Espero no olvidarme :laugh:
Por ahora gana Novlucker, ya que es el unico que ha presentado una version funcional (en Python)...
Jope!!!! :xD Con ese título quedo fuera de toda competencia!! :xD :xD :xD
Así que es Novlucker... el que va ganando, las cosas que se entera una ;D sobre las capacidades funcionales de los compis. :P
Gabriela
He aqui la super-version :xD
n=input()
r=''
for x,y in zip([1000,900,500,400,100,90,50,40,10,9,5,4,1],'M CM D CD C XC L XL X IX V IV I'.split()):
while n>=x:
r+=y
n-=x
print r
:)
Ahora si, no se me había ocurrido usar zip, ni que luego de modificar mi code para que estuviese correcto, me ahorraba 16 caracteres haciendolo con split ;D
aquí va mi super corta verción ajajja
n=input()
while n<11 and n>0:
if n==1:
print 'I'
if n==2:
print 'II'
if n==3:
print 'III'
if n==4:
print 'IV'
if n==5:
print 'V'
if n==6:
print 'VI'
if n==7:
print 'VII'
if n==8:
print 'VIII'
if n==9:
print 'IX'
if n==10:
print 'X'
n=input()
PD: solo funciona hasta 10 XD