animework

Estamos trabajando con SLE2 y nos dejaron una actividad y es hacer un algoritmo donde tu digitas un numero y el te da su simbolo en romano, ya e echo lo dificil pero cuando ejecuto y escribo un numero menor de 10 me sale dos veces el numero. E aqui el algoritmo que e echo y a ver si alguien puede decirme donde esta mi error. var n1,n2,n3:numerico inicio cls() leer(n1) n2=int(n1/10) n3=n1 % 10 si(n2==1) { imprimir("X" sino si(n2==2) { imprimir("XX" sino si(n2==3) { imprimir("XXX" sino si(n2==4) { imprimir("XL" sino si(n2==5) { imprimir("L" sino si(n2==6) { imprimir("LX" sino si(n2==7) { imprimir("LXX" sino si(n2==8) { imprimir("LXXX" sino si(n2==9) { imprimir("XC" sino si(n2==10) { imprimir("C" } } } } } } } } } } si(n1==1) { imprimir("I" sino si(n1==2) { imprimir("II" sino si(n1==3) { imprimir("III" sino si(n1==4) { imprimir("VI" sino si(n1==5) { imprimir("V" sino si(n1==6) { imprimir("VI" sino si(n1==7) { imprimir("VII" sino si(n1==8) { imprimir("VIII" sino si(n1==9) { imprimir("IX" sino } } } } } } } } } si(n3==1) { imprimir("I" sino si(n3==2) { imprimir("II" sino si(n3==3) { imprimir("III" sino si(n3==4) { imprimir("VI" sino si(n3==5) { imprimir("V" sino si(n3==6) { imprimir("VI" sino si(n3==7) { imprimir("VII" sino si(n3==8) { imprimir("VIII" sino si(n3==9) { imprimir("IX" sino } } } } } } } } } fin AGRADESCO LA AYUDA