☺ (: :::POLI TONTUELO::: :) ☺

Prueba de SintaxHighlighter de Google y WLW

2009-03-26T13:20:00.001-04:00

Una simple prueba de como se ve el coloreado de sintaxis

/* Prueba de busqueda de secuencia */
import java.io.*;
import java.util.*;
public class TestSecuencias {

	public static void main ( String [] args ) {

		long t2 = 0, t1 = 0;
		for (int i=10;i<100001;i = i * 10){
			int [] a = genera_vector(i);
			
			System.out.println("N: " + i);
			System.out.println("N\tN2\tN3\tLog");
			//Lineal
			t1 = System.nanoTime();
			subsecuenciaSumaMaximaN(a);
			t2 = System.nanoTime();
			System.out.print((t2-t1)+"\t");
			
			//Cuadratico
			t1 = System.nanoTime();
			subsecuenciaSumaMaximaN2(a);
			t2 = System.nanoTime();
			System.out.print((t2-t1)+"\t");			
			//Cubico
			t1 = System.nanoTime();
			subsecuenciaSumaMaxima(a);
			t2 = System.nanoTime();
			System.out.print((t2-t1)+"\t");
			
			//Logaritmico
			t1 = System.nanoTime();
			maxSubSum4(a);
			t2 = System.nanoTime();
			System.out.println((t2-t1));
		
		}
		
	}
	/* Algoritmo lineal */

	public static int [] genera_vector ( int N ){
			int [] vector = new int [N];
			Random rand = new Random();
			for (int i=0;i< i="0," int for secIni,secFin; sumaMax="0;" a [] subsecuenciaSumaMaximaN( static public } vector; return vector[i]="rand.nextInt(10000);"> sumaMax ) {
				sumaMax = sumaActual;
				secIni = i;
				secFin = j;
			} else if ( sumaActual < 0 ) {
				i = j + 1;
				sumaActual = 0;
			}

		}
		
		return sumaMax;
	}
	
	/* Algoritmo cuadratico */

	public static int subsecuenciaSumaMaximaN2( int [] a ) {
		int sumaMax = 0,secIni,secFin;
		for (  int i = 0; i < a.length; i++ ) {
		
				int sumaActual = 0; 
				
				for ( int j = i; j < a.length; j++ ) {
					sumaActual += a [ j ];
				
				if ( sumaActual > sumaMax ) {
					sumaMax = sumaActual;
					secIni = i;
					secFin = j;
				}
				
			}
		}
		
		return sumaMax;
	}
	
	/* Algoritmo cúbico */

	public static int subsecuenciaSumaMaxima( int [] a ) {
		int sumaMax = 0,secIni,secFin;
		for (  int i = 0; i < a.length; i++ ) {
			for ( int j = i; j < a.length; j++ ) {
				int sumaActual = 0; 
				
				for ( int k = i; k <= j; k++ ) {
					sumaActual += a [ k ];
				
				if ( sumaActual > sumaMax ) {
					sumaMax = sumaActual;
					secIni = i;
					secFin = j;
				}
				
			}
		}
	  }
		return sumaMax;
	}
	
	/* Algoritmo logaritmico */

	private static int maxSumRec( int [] a, int izdo, int dcho ) {
		int maxSumIzdaBorde = 0, maxSumDchaBorde = 0;
		int centro = ( izdo + dcho ) / 2;
		int sumIzdaBorde=0,sumDchaBorde=0;
		if ( izdo == dcho ) // caso base
			return a[ izdo ] > 0 ? a[ izdo ] :  0;

		int maxSumIzda = maxSumRec( a, izdo, centro );
		int maxSumDcha = maxSumRec( a, centro + 1, dcho );
		
		for ( int i = centro; i >= izdo; i-- ) {
			sumIzdaBorde += a [i];
			if ( sumIzdaBorde > maxSumIzdaBorde ) {
				maxSumIzdaBorde = sumIzdaBorde;
			}
			
		}
		
		for ( int j = centro + 1; j <= dcho; j++ ) {
			sumDchaBorde += a[j];
			if ( sumDchaBorde > maxSumDchaBorde ) {
				maxSumDchaBorde = sumDchaBorde;
			}
			
		}
		
		return max3( maxSumIzda, maxSumDcha, 
						  maxSumIzdaBorde + maxSumDchaBorde );
		
	}

	// Rutina visible publicamente
	public static int maxSubSum4( int [] a ) {
		return maxSumRec ( a, 0, a.length - 1 );
	}
	
	public static int max3(int  maxSumIzda, int maxSumDcha, int sumabordes ){
		int retorno = 0;
		
		if ( maxSumIzda > maxSumDcha && maxSumIzda > sumabordes ) retorno = maxSumIzda;
		if ( maxSumIzda < maxSumDcha && maxSumDcha > sumabordes ) retorno = maxSumDcha;
		if ( sumabordes > maxSumDcha && maxSumIzda < sumabordes ) retorno = sumabordes;
		
		return retorno;
	}
	
}

Rock Vs. Policia!

2009-02-16T19:22:00.001-03:00

JUAZ!!! XD Este Capusotto es un grande!!!

Maratonica Noche/Madrugada de Algoritmos para salvar el año ☺

2008-05-27T01:51:00.003-04:00

Uff..una vez mas...estoy aqui tratando de salvar mi pellejo de la manera mas tipica...A ULTIMA HORA.. :D
Ok..ire editando la entrada a medida que termino los algoritmos..
El primero es resolver una sopa de letras..he aqui el codigo..

//problema uno..
/*Sopa de letras...*/
var
matrix :matriz [*,*] cadena
letra,texto,lista,listaf : cadena
vpalabra : vector [*] cadena
m,n,i,j,k,p,npalabras : numerico
encontrado : logico
inicio
cls()
imprimir ("Xfavor, defina las dimensiones de la matriz(sopa de letras)..")
imprimir ("\nFilas:")
leer (m)
imprimir ("Columnas:")
leer (n)
dim(matrix,m,n)
desde i=1 hasta m {
desde j=1 hasta n {
cls()
leer(letra)
si (strlen(letra)==1) {
matrix[i,j]=letra
sino
cls()
imprimir ("\nLo ingresado no fue una letra..presione enter para continuar..")
leer(letra)
j=j-1
}
}
}
imprimir ("\t\tLA SOPA DE LETRAS A QUEDADO ASI...\n")
//imprimir matrix
cls()
desde i=1 hasta m{
desde j=1 hasta n{
imprimir (matrix[i,j]," ")
}
imprimir ("\n")
}

imprimir ("Presione enter para continuar...")
leer(letra)

cls()
imprimir ("Introduzca el Texto a buscar en la Sopa de letras:\n")
leer(texto)
texto=texto + " "

desde i=1 hasta strlen(texto){
si(substr(texto,i,1)==" "){
npalabras= npalabras + 1
}
}

dim(vpalabra,npalabras) //Se dimensiona un vector..se guarda cada palabra en el vector...
letra=""
j=0

desde i=1 hasta strlen(texto){
si(substr(texto,i,1)==" "){
j=j+1
vpalabra[j]=letra
letra=""
sino
letra=letra + substr(texto,i,1)
}
}

//la parte inchabolas..jeje :P
desde k=1 hasta npalabras
{
letra=substr(vpalabra[k],1,1)
//se busca la letra...
encontrado=FALSE
desde i=1 hasta m
{
desde j=1 hasta n
{
//imprimir (i," ",j);leer(texto)
si(letra==matrix[i,j]) //se encontro la primera letra..
{
//imprimir (i," ",j,"-",letra,"-",vpalabra[k]);leer(texto)
//se comprueba de manera horizontal...
encontrado=FALSE //se establece en falso pues no sabemos si se ha encontrado :D
lista=""
si ((m-i+1) >= strlen(vpalabra[k])){ //comprueba que existen suficientes letras..
desde p=1 hasta strlen(vpalabra[k]){
encontrado=TRUE
si (substr(vpalabra[k],p,1)<>matrix[i+p-1,j]){
encontrado=FALSE ; p=strlen(vpalabra[k]) ; lista="" //mandamos todo a la mierda pues no esta la palabra completa..
sino
lista= lista + "(" + str(i+p-1) + "," + str(j) + ");" //se mete en la lista las posiciones..
si (p==strlen(vpalabra[k])){ //si no hubo un error y terminamos con las letras pues guardamos las dir.
encontrado=TRUE //de las posiciones.. :D
listaf=listaf + lista + "||"
}
}
}
}
//si no se encontro..se comprueba verticalmente
si(not(encontrado)){
si ((n-j+1) >= strlen(vpalabra[k])){ //de nuevo comprueba si hay suficientes letras :)
desde p=1 hasta strlen(vpalabra[k]){
encontrado=TRUE
si (substr(vpalabra[k],p,1)<>matrix[i,j+p-1]){
encontrado=FALSE ; p=strlen(vpalabra[k]) ; lista=""
sino
lista= lista + "(" + str(i) + "," + str(j+p-1) + ");"
si (p==strlen(vpalabra[k])){
encontrado=TRUE
listaf=listaf + lista + "||"
}
}
}
}
}//si aun asi no se a encontrado lo busca de manera diagonal..
si(not(encontrado)){
si ((n-j+1) >= strlen(vpalabra[k]) and ((m-i+1) >= strlen(vpalabra[k])) ){ //debe comprobar si existe vertica y horizontal..jeje
desde p=1 hasta strlen(vpalabra[k]){
encontrado=TRUE
si (substr(vpalabra[k],p,1)<>matrix[i+p-1,j+p-1]){
encontrado=FALSE ; p=strlen(vpalabra[k]) ; lista=""
sino
lista= lista + "(" + str(i+p-1) + "," + str(j+p-1) + ");"
si (p==strlen(vpalabra[k])){
encontrado=TRUE
listaf=listaf + lista + "||"
}
}
}
}

}
}//se pasara a buscar otra vez la letra en otro sector..
si(encontrado){ i=m ; j=n ; listaf=listaf + vpalabra[k] + "<- \n" } } } si(not(encontrado)) { imprimir ("no sea a encontrado..",vpalabra[k],"\n") } } imprimir (listaf) fin //(c) Santi Valdez - siempre de valdez...jeje :PEspero que les sirva..jeje :D

Desarrollo de aplicacion con KDevelop

2008-05-02T06:44:00.009-04:00

Hola!! Que tal? Tanto tiempo :)
Ok...Hoy voy a intentar explicar como crear una pequeña aplicación visual bajo Linux, en KDevelop.

Empezamos.
Obviamente debemos de tener instalado Kdevelop previamente...
Por si no lo tienen esta es la pagina del proyecto.
Una vez que ya lo tengan instalado. Ejecutamos KDevelop. Luego Project -> New Project... -> C++ -> KDE -> Simple Designer based KDE app..

Luego completamos el nombre del proyecto etc etc.. (sgte. sgte. estilo Bill...)
Ahora, Buil->Build Project , o , presionamos F8.
Si todo esta bien. No tendremos ningún error. Luego corremos nuestra aplicación, (La tuerquita :) o Shift+F9).
Y?..si ahi esta nuestro primer engendro visual en Linux?..Difícil??naaa!! :D
"Pero si no tocamos ninguna linea de código...esto no es programar..."
Tranquilo pequeño saltamontes...Para empezar a moldear a esta pequeña criatura, simplemente abrimos el archivo
widget.cpp. Aquí se encuentran las sentencias del pequeño. Cambiemos el mensaje del label. Suena muy anglosajón el HelloWorld...Pongamos un típico "HOLA MUNDO :)"... Si ya se que son cambios tontos. Pero es un buen comienzo. Quizas quieras que el Boton cambie de texto. Agrega la cabecera

#include "qpushbutton.h"

buton->setText("texto nuevo del botón..");

Lo demás hacelo vos porque yo te mostré bastante.. :)
Nos vemos en otra entrada :P

Danm it!

2008-04-24T02:01:00.002-04:00

Uf! Perdón por dejar olvidado el blog, pero es que andaba en otras cosas. Por ejemplo, casi toda la semana no tuve windows por culpa de un apagón que mando el OS. a la m... y si,use Fedora pero nunca se me ocurrió publicar una entrada..jaja En estos momentos me encuentro en Fedora, no porque no tenga Windows sino porque le tomé el gusto :D
Son las 2:06 AM, y estoy instalando Fedora Eclipse, FreePascal y otros IDE's que encontré por ahí :)
Tengo sueño, pero aun asi sigo pensando en un problema que acabo de leer en el libro "Fundamentos de Programación - Luis Joyanes Aguilar", el problema es el famoooooooso problema de las 8 REINAS. Ya lo conocía,pero nunca lo intente resolver ;) , ademas, de que el libro especifica que debemos resolverlo por recursividad. Bastante interesante no?. Espero poder resolverlo para mañana o por lo menos tener una idea para cuando me vuelva despertar, mientras tanto, creo que voy a dormir un poco, pues tengo bastante tiempo libre hasta mi clase de Algoritmos mañana a las 17:30 :)
See ya!!

Otro intento de salvar mi pellejo...

2008-04-09T14:31:00.002-04:00

Tratando de salvar mi pellejo...Una vez mas voy a tratar de aprenderme todo el contenido de una catedra,en un tiempo record...jajaja.. Esta vez le a tocado el turno a Fundamentos...Vectores,Planos,Geometria Analitica...ok,veamos quien termina ganando..Ellos o YO!!! :D

:::MARATON:::

2008-04-07T19:26:00.002-04:00

Ok...este es un pequeño desafio personal,y en vista que el nro. de visitantes se ha diezmado..Entonces lo pongo :D Me chupan la happy los lectores...jeje
Basicamente, voy a tratar de resolver 40 problemas de Algoritmia entre hoy (01:00) hasta mañana (12:00). Vamos a intentar...
Para esta dificil labor tengo a mi dispocision.

1- Un caja de Kent 20 (actualmente Kent 19 :P )
2- Un equipo de Terere
3- Drugs..
4- PC
5- SL
6- My brain

Dando señales de vida nuevamente

2008-04-06T15:26:00.002-04:00

HoLa!! al fin de nuevo juntos...Como se habran dado cuenta cambie un poco el aspecto de la pagina,para que sea mas atractiva :D. Seguire agregando Gadgets interesantes y posteando nuevas cosas...Mientras tanto,colaboren conmigo y hagan click en AdSense y sigan comentando :)

:::DIAPOSITIVAS de FUNDAMENTOS:::

2008-03-18T11:25:00.004-04:00

Diapositivas de Fundamentos en PDF. Comprimidos en .rar :D espero q les sirva...
FeLiZ Semana SaNtA x cierto...ja!! ;)

DESCARGAR::DIAPOSITIVAS FUNDAMENTOS::

See ya!! :D

:::GEOMETRIA ANALITICA LEHMANN:::

2008-03-11T22:45:00.003-04:00

Opa opa..como los gremlins, deje un poco vacia la pagina por estos días. Acá les dejo un aporte más para sus respectivas bibliotecas virtuales :)
GEOMETRIA ANALITICA - Charles H. Lehmann
Buenísimo el libro...espero que les sirva

Geometría Analítica - Lehmann (4shared)

See ya!! :P

::Sistemas Digitales, Principios y Aplicaciones - Ronald J. Tocci ::

2008-03-01T13:22:00.002-03:00

Uf!..despues de una pequeña busqueda al fin aparecio :D. El amigo Tocci se hace presente ante nosotros,de manera gratuita,pero lastimosamente en imagenes (libro escaneado.Imagenes en formato jpeg),aunque de todos modos bastante ordenado y legible.
Debido a que el libro esta un poco muuuy pesado se los dejo de dos maneras.
un hashlink de ares :

Haslink Ares

(creo que deben tener el Ares abierto :P )

y en rapidshare,comprimido en .rar,por pedacitos y partido con hacha..

(El hacha x si no lo tengan...)

HaCha.Zip

Espero que les sirva.. weno chau! :D

SL

2008-02-29T07:40:00.002-03:00

Lenguaje Segovia :D... les dejo los link pa q lo bajen
http://www.cnc.una.py/sl/ (pag. principal del proyecto SL )
http://www.cnc.una.py/sl/setup.exe (instalador SL pa güindous)
http://www.cnc.una.py/sl/sle-2.0-4.i386.rpm (paquete rpm pa Linux...(testeado bajo RH) )
http://www.cnc.una.py/sl/libro-sl.pdf (e-book "introduccion a SL..")

Y weno..eso es too de SL.
Para los q no quieren entrar en la pagina les dejo la portada abajo y me despido.. :D

SL es un lenguaje diseñado para apoyar la formación profesional de estudiantes de Informática. Las construcciones del lenguaje fueron cuidadosamente seleccionadas para que el alumno se concentre en la búsqueda de las soluciones algorítmica apropiadas, obviando detalles de implementación que seguramente tendrá ocasión de estudiar en otras etapas de su aprendizaje.
El lenguaje presenta características que lo hacen apropiado para expresar algoritmos de las etapas iniciales del aprendizaje, pero simultáneamente reúne un rico conjunto de construcciones que posibilitan el tratamiento de tópicos más avanzados de estructuras de datos y programación modular.
Las principales características del lenguaje se describen aquí. También puede encontrar algunos ejemplos sencillos.
El entorno de desarrollo se llama SLE. La versión más reciente de SLE está disponible para Windows (Windows 95/98, 2000, NT, XP) y Linux.

:::MATEMATICA DISCRETA:::

2008-02-29T06:47:00.000-03:00

OK! Les dejo el primer aporte...
Un pequeño libro en pdf sobre matematica discreta (no esta en el programa pero tenia pinta de estar bueno..) ---->

http://www.4shared.com/file/39299703/eb7b0b8a/Matematica_Discreta_By_priale_.html

Y por supuesto..el programa de estudios de Matematica Discreta de la Faq... ---->

http://www.4shared.com/file/39299702/9c7c3b1c/MatematicaDiscreta.html

Espero que les sirva de algo :D ya voy a ir subiendo poco a poco mas y mas cosas que encuentre x ahi,hasta q me consiga un trabajo y tenga algo q hacer x las mañanas jojoojo! Bueeenoo chau! XD

<>

2008-02-29T06:43:00.000-03:00

Holas mi amor!! ja! les doy la bienvenida a esta humilde paginilla/blogsillo q espero q les sirva.. "Estuimos traajando con el profe durante la semana,y eperamo deja los trrre punto en casa.." ja! :D
Weno..cuidense y q no le muerda ninguna viruslana x ahi see ya!!!

Atte.
Io!