|
|
Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.
Mensajes - m0skit0
Páginas: 1 ... 91 92 [93] 94 95 ... 100
2301
« en: Lunes 15 de Septiembre de 2008, 09:46 »
Bueno, lo del error, supongo que quería que rellenaramos lo que faltaba. Un poco de recursividad por favor  Function Secuencia(Nro_Iterac As Integer) As Double If Nro_Iterac = 1 Then Secuencia = 1 Else Secuencia = (1/Nro_Iterac) + Secuencia(Nro_Iterac - 1) End If End Function
Más limpio y más sencillo imposible. Un saludo y probad la programación funcional, programar sin variables, sólo funciones.
2302
« en: Lunes 15 de Septiembre de 2008, 09:41 »
¿Los números pueden ser reales o sólo enteros? Si son reales (como pone en tu código, float), indica qué formato de coma flotante pretendes usar para representar números con decimales en binario. Un saludo.
2303
« en: Lunes 15 de Septiembre de 2008, 09:38 »
Hola Hammerstrike *a [MAXCOL ]=(int *) malloc(nfilas * ncols * sizeof(int)); *b [MAXCOL ]=(int *) malloc(nfilas * ncols * sizeof(int)); *c [MAXCOL ]=(int *) malloc(nfilas * ncols * sizeof(int));
Si vas a reservar toda la memoria de golpe, ¿por qué no declaras directamente vectores de enteros? Malloc() es para ir reservando memoria cuando la necesites. Si reservas todo de golpe, es lo mismo que hacer int a[MAXCOL], b[MAXCOL], c[MAXCOL];
Aparte, haciendo *a [MAXCOL ]=(int *) malloc(nfilas * ncols * sizeof(int));
incurres en un par de errores: 1. a[30] está fuera del rango de tu array, que va de 0 a 29. 2. Sólo reservas memoria para el puntero a[30], dejando los otros 30 (a[0] hasta a[29]) sin inicializar, por lo que podrían tener cualquier valor. Ambos errores te pueden dar un SIGSEGV. Un saludo.
2304
« en: Lunes 15 de Septiembre de 2008, 09:27 »
A ver si alguien tiene alguna idea de por qué puede producirse este error, al comenzar el FOR (línea 1): Dim xlsProtocol As Excel.Workbook Dim Hoja As Excel.Worksheet {...} For Each Hoja In xlsProtocol.Worksheets If UCase(Trim(Hoja.Name)) = UCase(Trim(NombrePerfil)) Then Aux = False End If Next
"El procedimiento Let de la propiedad no está definido y el procedimiento Get no ha devuelto un objeto" Cualquier pista es la bienvenida. Gracias de antemano.
2305
« en: Viernes 12 de Septiembre de 2008, 15:46 »
Se abre el telón y aparece Juan Tamariz (un mago español) haciendo trucos de magia. De repente, surge un Alien de la oscuridad y se queda mirando fijamente a Tamariz. Cuando éste termina su truco, el Alien dice como una oveja: "¡Beeeeeeeeeeeeee!" ¿Cómo se llama la película?
"Alien baló sorprendido del truco"
2306
« en: Viernes 12 de Septiembre de 2008, 15:40 »
2307
« en: Viernes 12 de Septiembre de 2008, 15:21 »
Creo recordar que no se puede poner un mismo elemento repetido con el mismo nombre en un diagrama, sea cual sea su función. Deberías de usar el mismo actor (al dibujo me refiero) como iniciador y receptor.
2310
« en: Viernes 12 de Septiembre de 2008, 14:35 »
Gracias por las respuestas, nenes. Me han hecho reconsiderar mi posición. 
2311
« en: Viernes 12 de Septiembre de 2008, 14:31 »
Efectivamente, faltaba la condición de salida, pero si hay una solución simple, ¿para qué queremos una complicada? Function Factorial(X As Integer) As Integer 'El factorial de cero es 1 'Esta es la CONDICION de SALIDA If X = 1 Then Factorial = 1 Else Factorial = X * Factorial(X - 1) End If End Function
2312
« en: Jueves 4 de Septiembre de 2008, 09:27 »
Bueno, sinceramente, me había gustado este foro, hasta que algunos "moderadores" (si se les puede llamar así, más bien CENSORES), se dedican a quitarme los comentarios. Sé que hay comentarios que estuvieron fuera de lugar y entiendo que se quiten, no me quejo de eso, pero desde luego otros no y no lo voy a aguantar. Si le digo a uno en que reclame su disco de Windows Vista que para eso pagó por su licencia, ningún moderador tiene ningún argumento  ético/político/legal para borrarme el post salvo que sea un friki de Microsoft y le haya molestado mi comentario de que esta empresa nos toma el pelo un día sí y otro también. Si aconsejarle a la gente que exija sus derechos está mal visto en este foro, pues buscaos a otro que os eche una mano. Aquí sólo me he dedicado a resolver las dudas de la gente (aparte de algún que otro chiste) sin pedir nada a cambio. Y esto es lo que obtengo. Desde luego, uno de los foros más desagradecidos en los que he tenido la oportunidad de participar. La verdad es que ni me siento molesto, simplemente decepcionado. Que tengan un buen día.
2313
« en: Jueves 4 de Septiembre de 2008, 08:53 »
2314
« en: Jueves 4 de Septiembre de 2008, 08:50 »
frase = (char*)malloc(sizeof(char)*MAX );for(i=0;i<MAX ; i++) { if(frase[i] == 'n') break; } frase[i] = ' ';
Fundamental, hay que poner el terminador de cadena de caracteres, nunca lo olvides (en este caso he sustitído 'n' puesto que he considerado que no forma parte de la frase). Y ya que has definido constantes, úsalas.
2315
« en: Jueves 4 de Septiembre de 2008, 08:38 »
fopen(), pero es C, no C++.
2316
« en: Jueves 4 de Septiembre de 2008, 08:34 »
EOF no es char, es int, por lo tanto jamás podrá corresponder a una tecla del teclado. Te aconsejo que la cambies por "n" o algo similar que pueda provenir del teclado (suponiendo claro que stdin apunte al teclado). prueba pulsando Ctrl-z Eso deja inactiva la tarea y la pasa a segundo plano en Linux. Es una señal al proceso, por tanto no te va a servir de nada ( man jobs para más información).
2317
« en: Jueves 4 de Septiembre de 2008, 08:29 »
¿Para qué reinventar la rueda? Si se ha hecho una librería y es abierta, pues a aprovecharla, no?
En cuanto a tu punto 2, tienes que hacer una conexión utilizando los famosos sockets BSD de Linux y realizar una petición HTTP GET para obtener la página en cuestión (en HTML). Después sólo te queda buscar en ella la información que deseas.
Lo del afinador de guitarra es muy interesante (toco guitarra y bajo entre otras cosas), te agradecería que postearas la información que encuentres, gracias.
2318
« en: Jueves 4 de Septiembre de 2008, 08:23 »
El tipo char es en realidad un byte sin signo con el código ASCII del carácter, es decir, char es un número. Es equivalente a unsigned short. Un saludo.
2319
« en: Miércoles 3 de Septiembre de 2008, 10:37 »
Tienes razón, perdón mi intención no era ofender sino ayudar. Lo tendré en cuenta la próxima vez. 
2320
« en: Miércoles 3 de Septiembre de 2008, 09:12 »
Sí, cualquier cosa se la pueden achacar a las FARC porque no se pueden defender en los medios. Y lo mismo en Líbano o Palestina con Israel.
2321
« en: Miércoles 3 de Septiembre de 2008, 08:40 »
Échale un vistazo a este enlace. También podrías simplemente usar la grabadora de Windows para guardar la salida de audio en WAV y la pasas a mp3, aunque todo esto se haría manualmente. Supongo que también se podrá automatizar, aunque no he investigado cómo.
2322
« en: Martes 2 de Septiembre de 2008, 21:04 »
Nada que ver con el tema, pero no es "Developer Software" sino "Software Developer", para que quede serio. 
2323
« en: Martes 2 de Septiembre de 2008, 21:01 »
O bien tienes mal configurado el compilador (tienes que incluirle los directorios donde se encuentrar los ficheros .h o bien poner la ruta completa, rollo #include "C:CompiladorProyectoCabecerasGato.h") o bien no lo has guardado como .h sino .cpp.
2324
« en: Martes 2 de Septiembre de 2008, 12:59 »
Y aparte, según MSDN: Una variable Variant puede contener una matriz de cualquier tipo, excepto cadenas de longitud fija y tipos definidos por el usuario.
2325
« en: Martes 2 de Septiembre de 2008, 12:48 »
Y para respaldar mi teoría, aquí te pongo un ejemplo, acompañado por el código fuente si quieres comprobarlo: Private Sub Funcion1() Dim Lista As Variant Dim a As Integer Dim i As Long If Not IsArray(Lista) Then Lista = Array() End If a = UBound(Lista) ReDim Preserve Lista(a + 1) For i = 1 To 100000 ReDim Preserve Lista(UBound(Lista) + 1) Lista(i) = 1 Next i End Sub
Private Sub Funcion2() Dim Lista As tTipo Dim a As Integer Dim i As Long Lista.NElementos = 0 a = Lista.NElementos ReDim Preserve Lista.Lista(a + 1) For i = 1 To 100000 Lista.NElementos = Lista.NElementos + 1 ReDim Preserve Lista.Lista(Lista.NElementos) Lista.Lista(i) = 1 Next i End Sub
Tiempos de ejecución: Funcion1() -> 1612 mseg. Funcion2() -> 69 mseg. 23 veces más rápido con el método que he comentado. Aquí te adjunto el proyecto: [attachment=0:dgcyi09s]Prueba Variant vs Registro.7z[/attachment:dgcyi09s]
Páginas: 1 ... 91 92 [93] 94 95 ... 100
|
|
|
Mostrar Mensajes
