daily pastebin goal
29%
SHARE
TWEET

Algoritmo - Challenge 10

a guest Jun 20th, 2011 724 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ////////////////////////////
  2. // ALGORITMO DEL PROGRAMA //
  3. ////////////////////////////
  4.  
  5. TIPO 'combo':
  6.         - Declarar un contenedor <teclas> de tipo cadena de caracteres que los almacene con orden
  7.         - Declarar una variable <texto> de tipo cadena de caracteres
  8. :fin-TIPO
  9.  
  10. PROGRAMA:
  11.         - Declarar una variable <N> de tipo numérico
  12.         - Declarar una contenedor <combos> de elementos tipo 'combo'
  13.        
  14.         - Declarar una variable <char> de tipo carácter
  15.         - Declarar una variable <combo> de tipo 'combo'
  16.         - Declarar una variable <tmp> de tipo cadena de caracteres
  17.         - Leer un número y asignarlo a <N>
  18.        
  19.         - Asignar a <tmp> el valor "" (cadena vacía)
  20.        
  21.         REPETIR mientras( el valor de <N> sea mayor que "0" ):
  22.                 - Leer un caracter y asignarlo a <char>
  23.                
  24.                 SI( <char> es un final de línea ):
  25.                         REPETIR ():
  26.                                 SI( <char> es un final de línea ):
  27.                                         - Añadir a <combos> el elemento <combo>
  28.                                         - Elimitar de <combo><teclas> todos los elementos
  29.                                         - Asignar a <combo><texto> el valor "" (cadena vacía)
  30.                                         :sal-REPETIR
  31.                                 :fin-SI
  32.                                 - Leer un caracter y asignarlo a <char>
  33.                                 - Añadir por el final a <combo><texto> el valor <char>
  34.                         :fin-REPETIR
  35.                         - Decrementar el valor de <N> en una unidad
  36.                 :SI-NO
  37.                         SI( <char> es un " " (espacio) ):
  38.                                 - Añadir a <combo><teclas> el valor <tmp> manteniendo el orden
  39.                                 - Asignar a <tmp> el valor "" (cadena vacía)
  40.                         :SI-NO:
  41.                                 - Añadir por el final a <tmp>
  42.                         :fin-SI
  43.                 :fin-SI
  44.                
  45.         :fin-REPETIR
  46.        
  47.         - Leer un número y asignarlo a <N>
  48.         REPETIR mientras( el valor de <N> sea mayor que "0" ):
  49.                 - Decrementar el valor de <N> en una unidad
  50.                 - Elimitar de <combo><teclas> todos los elementos
  51.        
  52.                 REPETIR ():
  53.                         SI( <char> es un final de línea ):
  54.                                 - Mostrar el valor <texto> de <combos> que tenga el elemento <teclas> igual que <combo><teclas>
  55.                                 - sal-REPETIR
  56.                         :SI-NO
  57.                                 SI( <char> es un " " (espacio) ):
  58.                                         - Añadir a <combo><teclas> el valor <tmp> manteniendo el orden
  59.                                         - Asignar a <tmp> el valor "" (cadena vacía)
  60.                                 :SI-NO:
  61.                                         - Añadir por el final a <tmp>
  62.                                 :fin-SI
  63.                         :fin-SI
  64.                 :fin-REPETIR
  65.                
  66.         :fin-REPETIR   
  67.        
  68. :fin-PROGRAMA
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top