Todos los foros
PSeInt Registrate_22_zps9e54cac0
Todos los foros
PSeInt Registrate_22_zps9e54cac0


 
ÍndiceNormasÚltimas imágenesRegistrarseConectarse

 

 PSeInt

Ir abajo 
2 participantes
AutorMensaje
Alba Cobo
Novato/a



Mensajes : 2

PSeInt Empty
MensajeTema: PSeInt   PSeInt EmptyLun Nov 13, 2017 2:14 pm

Hola! Soy alumna de segundo de Bachillerato tecleo . Mi profesora nos ha puesto un ejercicio sobre ordenar alfabéticamente una lista de nombres introducidos al azar. Llevo varios días intentando resolverlo pero no soy capaz Crying or Very sad
¿¿Alguien puede ayudarme?? confused I love you
Volver arriba Ir abajo
ivan2000vp
Novato/a



Mensajes : 4

PSeInt Empty
MensajeTema: Re: PSeInt   PSeInt EmptyLun Nov 13, 2017 2:16 pm

Proceso ordena_lista
DIMENSION lista[200];
Escribir "introduce una palabra"
leer nombre;//la palabra que introduce el usuario
lista[1]<-nombre; //carga el primer nombe a la primera posicon 
i<-2
Mientras nombre<>"" Hacer
Escribir "introduce otra palabra";
leer nombre; //la palabra que introduce el usuario
Para j<-1 Hasta i-1 Con Paso 1 Hacer
Si nombre<>lista[j] Entonces
lista[i]<-nombre;
Sino
Escribir "este nombre ya ha sido introducido";
j<-i-1;
i<-i-1;
Fin Si
Fin Para
i<-i+1;
Fin Mientras
Para j<-1 hasta i-1 hacer
pmenor<-j
para k<-j+1 hasta i-1 hacer
si lista[pmenor]>lista[k] entonces
pmenor<-k;
FinSi
FinPara
aux<-lista[j];
lista[j]<-lista[pmenor];
lista[pmenor]<-aux;
FinPara
Para j<-1 hasta i Hacer
escribir "", lista[j];
FinPara
FinProceso
Volver arriba Ir abajo
 
PSeInt
Volver arriba 
Página 1 de 1.
 Temas similares
-
» Pseint
» Duda pseint
» ¿Como se realizan subprocesos en pseint?
» Duda sobre subprocesos en PSeInt
» ¿Como usar el algortimo "Segun" en PSeint?

Permisos de este foro:No puedes responder a temas en este foro.
Todos los foros :: Asesoría Todos los Foros :: Informática :: Prácticas TIC-
Cambiar a: