Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #3  
Antiguo 01-08-2012
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola rbarzallo.

Una forma de realizarlo: Declara cinco variables, una para almacenar los 4 dígitos y 4 mas para que recorran los cuatro números.

El algorímo se reduce a:
Código:
variables
n        
a,b,c,d 

comenzar

leer n.  // leer los 4 dígitos

para a <- 1 hasta 4 
  ... 
    ...
      ...
        si no((n[a]=n[b]) v (n[a]=n[c]) v (n[a]=n[d]) v 
              (n[b]=n[c]) v (n[b]=n[d]) v (n[c]=n[d])) entonces
           escribir (n[a],n[b],n[c],n[d]).
  ...
Saludos.

Edito: No lo puse en Pascal para que realices algo de la tarea...
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 01-08-2012 a las 17:33:01.
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Combinaciones Delar Varios 21 17-02-2014 10:28:30
Cinco cifras para Neftali roman La Taberna 18 25-10-2010 17:36:41
Obtener la cantidad de cifras de un numero aeff Varios 12 10-10-2007 20:08:33
generar numero de 9 cifras aleatorio que nunca se repita coletaun Varios 9 19-02-2007 10:34:29
Cifras alucinantes en el ClubDelphi dec La Taberna 7 16-08-2006 01:32:10


La franja horaria es GMT +2. Ahora son las 05:37:15.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi