¿Alguien de ustedes tiene a su alcance un ordenador que sea suyo o que le pueda prestar un familiar? | Sololearn: Learn to code for FREE!
Nouvelle formation ! Tous les codeurs devraient apprendre l'IA générative !
Essayez une leçon gratuite
+ 2

¿Alguien de ustedes tiene a su alcance un ordenador que sea suyo o que le pueda prestar un familiar?

Si es así, descargue, por favor, en el sistema operativo del ordenador una hoja de calculo que sea de la version adecuada.Escriba en dicha hoja de calculo el código que muestro más abajo.No se si la versión adecuada es la del año 2017 o una anterior(la versión más antigua es la del 2003 y no es la adecuada). Intente ejecutar el programa y, si lo consigue,(lo que ocurrirá si ha descargado la version adecuada)le agradecería que me enviase el enlace del código de instrucciones(así podré ver la página web del código y ejecutar el programa en mi movil). El código al que me he referido en las líneas anteriores es el siguiente: Public function partic(n) dim(40,40) dim i,s,h,k if n=1 then partic=1:exit function k=n for i=1 to n a(1,i)=1 a(i,i)=1 next i for h=2 to n for i=2 to h-1 m=h-i s=0 for j=1 to i:s=s+a(j,m):next j a(i,h)=s next i next h for h=1 to n s=0 for i=1 to k s=s+a(i,h) next i next h partic=s end function

26th Aug 2020, 9:40 AM
Jose Luis Mena Perez
Jose Luis Mena Perez - avatar
38 Réponses
0
No resconosco el lenguaje. porfavor dime cual es.
29th Aug 2020, 9:40 PM
Daniel Briceño
Daniel Briceño - avatar
0
Es el lenguaje excel. Se utiliza en hojas de cálculo.
30th Aug 2020, 8:26 AM
Jose Luis Mena Perez
Jose Luis Mena Perez - avatar
0
lo guardé con la extensión xlsx y dice que el formato está dañao.
30th Aug 2020, 7:22 PM
Daniel Briceño
Daniel Briceño - avatar
0
Creo que existe una solución para este problema. Haga clic, por favor, en Archivo y en Abrir. Seguidamente, haga clic en el sitio y en la carpeta en la que se encuentra el libro dañado. En el cuadro de diálogo Abrir seleccione el libro(el archivo que es el código de instrucciones que le mostré en el primero de mis dos anteriores mensajes) dañado. Haga clic, a continuación, en la flecha que hay al lado del botón Abrir y haga clic en "Abrir y reparar".Para la recuperación de todos los datos del libro haga clic en Reparar. Si con el comando Reparar no es posible recuperar los datos, haga clic en Extraer datos para extraer los datos(o sea, los valores y fórmulas del libro).
31st Aug 2020, 1:51 PM
Jose Luis Mena Perez
Jose Luis Mena Perez - avatar
0
disculpa por la tardanza pero no tengo acceso al internet durante mucho tiempo al dia. Exel me envió un mensaje con varios posibles errores como el que la cadena se rompió por favor envíame una explicación de como usar exel para entender mas de exel y ¿Exel tiene su propio lenguaje de programación?. Gracias por su atención.
2nd Sep 2020, 1:01 AM
Daniel Briceño
Daniel Briceño - avatar
0
Existen distintas versiones de las hojas de cálculo Excel: - La del 2017. Esta es, probablemente, la versión en la que está escrito el codigo de instrucciones. - La del 2016. Si no está escrito el código de instrucciones en la versión del 2017 del lenguaje excel, es muy posible que sea esta(la del 2016) la que corresponde a dicho código. - La del 2015. - La del 2014. - La del 2013, la del 2012, la del 2011, la del 2010, la del 2009, la del 2008, la del 2007, la del 2006, la del 2005, la del 2004 y la del 2003(esta última version no sirve para ejecutar el programa). Te agradecería que fueras probando hojas de cálculo de estas versiones para comprobar con cual de ellas se puede ejecutar el programa(o sea, con cual no aparecen mensajes que indiquen que hay en el codigo uno o varios errores). Recuerda que la sintaxis(o sea, el conjunto de reglas para escribir códigos de instrucciones sin errores) de cada versión del lenguaje Excel es diferente.
2nd Sep 2020, 7:56 AM
Jose Luis Mena Perez
Jose Luis Mena Perez - avatar
0
si en la que yo probé fue del 2010.
2nd Sep 2020, 9:27 PM
Daniel Briceño
Daniel Briceño - avatar
0
Comunicame, por favor, después de probar cada versión del lenguaje Excel, si el programa da error o no (o sea, si el intérprete o el compilador ha advertido uno o varios errores en el código de instrucciones).
3rd Sep 2020, 8:49 PM
Jose Luis Mena Perez
Jose Luis Mena Perez - avatar
0
no tengo acceso a tanto internet gracias por su atención
3rd Sep 2020, 11:04 PM
Daniel Briceño
Daniel Briceño - avatar
0
Por favor, ¿podrías enviarme los mensajes de error que aparecieron en pantalla cuando hiciste uso de la versión del lenguaje Excel del año 2010?(te agradecería que copiaras dichos mensajes palabra por palabra en tu respuesta). Te pido que me envíes dichos mensajes de error palabra por palabra porque así es probable que yo pueda traducir correctamente el código de instrucciones del lenguaje Excel al Python. Me conviene hacer esa traducción porque el lenguaje Python es el que conozco a fondo.
4th Sep 2020, 6:46 AM
Jose Luis Mena Perez
Jose Luis Mena Perez - avatar
0
los primeros errores fué mio, lo que pasa que no sabia donde ejecutar el código y lo ejecuté como una fórmula exel. Hasta que me dí cuenta de que exel tiene una sección para programadores y que para acceder a ella uno tiene que ir a opciones\personalizar cintas de opciones. ya hay me da la opción de activar la casilla de programadores. Y después ir al nuevo incono de programadores que apareció y crear una biblioteca macro para insertar el mismo código. Pero en esta versión visual estudio 34 bist encontré los siguientes errores: 1• public function partic(n). y use esto como reemplazo: function partic(n:=1). 2•dim(40,40). use esto como reemplazo: dim a(40,40) y tambien entré este error que no se como arreglar: Argumento no es opcional. pero otra parte del código no modifique.
5th Sep 2020, 2:12 AM
Daniel Briceño
Daniel Briceño - avatar
0
Creo que el mensaje de error "Argumento no es opcional" significa que si escribes 1. Function partic(n:=1) Has de escribir 2. Dim a(1,1). No escribas 2.Dim a(40,40) porque el primero. de los dos cuarentas es el argumento(o sea, el número que pasas por una funcion) que sustituye al parámetro n. Y el argumento que habías elegido en la línea de código 1 era 1.Por tanto, también ha de ser uno el argumento que sustituye a n en la línea 1. Otra forma de corregir este error puede ser elegir como argumento que sustituya al parámetro n el número 20. De este modo, la primera línea de código quedaría asi: 1. Function partic(n:=20) Y la segunda línea de código sería esta: 2.Dim a(20,20)
11th Sep 2020, 10:07 AM
Jose Luis Mena Perez
Jose Luis Mena Perez - avatar
0
Disculpa por no responder antes. Solo que no sé como obtener el enlaze ya que no tengo la hoja del calculo exe vinculada a una cuenta, por lo que entiendo es que se necesita vincular una cuenta exe para poder subir un archivo. Si Dios quiere mañana intento otra vez con ese código a ver si cometí otro error que pasé por alto. buenas noches.
12th Sep 2020, 3:07 AM
Daniel Briceño
Daniel Briceño - avatar
0
Daniel, prueba, por favor, escribir en la primera linea de codigo lo siguiente: 1.Function partic(n:=15) Y, en la segunda linea, te agradeceria que anotases esto: 2.Dim a(15,15) A continuación, intenta ejecutar el programa al que pertenecen estas dos líneas de código y las restantes, estando escritas no sólo las dos líneas que te he reproducido en este mensaje, sino también las restantes. Informame en tu respuesta a este mensaje, por favor, de si has conseguido ejecutar el programa o de si, por el contrario, te ha dado, como minimo, un error.
12th Sep 2020, 1:23 PM
Jose Luis Mena Perez
Jose Luis Mena Perez - avatar
0
No pude responder antes por el internet. Tu codigo salio calidad cambia los numeros del 2 a 15 como si fuera aleatorio aqui estan los resultados: =partic(15) 170; =partic(14) 135 =partic(13) 101 =partic(12) 77 =partic(11) 56 =partic(10) 42 =partic(9) 30 =partic(8) 22 =partic(7) 15 =partic(6) 11 =partic(5) 7 =partic(4) 5 =partic(3) 3 =partic(2) 1 =partic(1) 1 Y asi puse el codigo: Function partic(n) Dim a(15, 15) Dim i, s, h, k If n = 2 Then partic = 1: Exit Function k = n For i = 1 To n a(1, i) = 1 a(i, i) = 1 Next i For h = 2 To n For i = 2 To h - 1 m = h - i s = 0 For j = 1 To i: s = s + a(j, m): Next j a(i, h) = s Next i Next h For h = 1 To n s = 0 For i = 1 To k s = s + a(i, h) Next i Next h partic = s End Function consejo: que tal si en la dimension 15 o dim(15,15) le pones dim(1000,1000). Asi no estará limitado a 15 numeros sino a 1000 numeros.¿ Y donde aprendiste a hacer esta function? para tambien aprender.
16th Sep 2020, 7:28 PM
Daniel Briceño
Daniel Briceño - avatar
0
Este código de instrucciones aparece en un artículo de Internet que gira en torno al cálculo de las particiones que se pueden hacer de un número, o sea, en torno al número de veces que se puede descomponer en sumandos. Por ejemplo, las particiones que se pueden hacer del número 5 serian: 5. 4+1. 3+2. 3+1+1. 2+2+1. 2+1+1+1. 1+1+1+1+1. En total, se pueden hacer 7 particiones del número 5. Por cierto, te pediría un favor y es que te hagas una cuenta que este vinculada a la hoja de cálculo que has utilizado(una que sea gratuita) y que me envíes el enlace del código de instrucciones que has escrito y que calculaba el número de particiones que se pueden hacer del número 15 (el enlace es el nombre de la página web en la que ha quedado este código de instrucciones que has escrito). Te pido el enlace porque, sin saber cual es, es imposible con un móvil(con un ordenador si que es posible aunque no se conozca el enlace del codigo)ejecutar un programa con un código de instrucciones tan complejo como el que te mostré
17th Sep 2020, 2:24 PM
Jose Luis Mena Perez
Jose Luis Mena Perez - avatar
0
ok.
17th Sep 2020, 3:02 PM
Daniel Briceño
Daniel Briceño - avatar
0
Daniel, he hecho clic en el enlace que me has enviado, pero no aparece en pantalla el código de instrucciones. ¿Has probado hacer clic en ese enlace para comprobar si funciona o si te funciona al menos a ti?El enlace que te pedia no es el de Microsoft Ou- tlook ni el del sitio web Office, sino el nombre de la página web en la que ha quedado el código de instrucciones que has escrito.¿El código lo eliminaste después de haber ejecutado el programa con exito?Te lo pregunto porque, si lo has eliminado, ya no me sirve el enlace.El enlace me sirve si el código está escrito.
18th Sep 2020, 9:21 AM
Jose Luis Mena Perez
Jose Luis Mena Perez - avatar
0
no lo escribí en una página lo hice directo en la computadora recurda en window 7 lo trae preinstalado con la computadora. Por eso no se que enlace mandarte, intentaré madarlo. Tu me dices de la hoja de cálculo de google.
18th Sep 2020, 12:39 PM
Daniel Briceño
Daniel Briceño - avatar
0
Si quieres te envío el archivo con las macro de virsual basic y lo abres con la pagina que dices se me haría mucho mas facil.
19th Sep 2020, 3:12 AM
Daniel Briceño
Daniel Briceño - avatar