Fórum Combinação de numeros #218688
05/03/2004
0
Olá, preciso de uma rotina que faça o seguinte:
Tenho os numeros 0-1-2-3-4-5-6-7-8-9
gostaria de fazer combinaçoes emtre si mas que me mostre da seguinte forma: 01-03-05-04-10
45-44-35-10-60
e vai até formar todas as combinações possiveis entre si.
Fico grato,
meu email é: ma-silverio@bol.com.br
Delphi1
Curtir tópico
+ 0
Responder
Posts
05/03/2004
Afarias
uma forma::
T+
const
C=´0123456789´;
var
I, J: Integer;
begin
for I := 1 to 10 do
for J := 1 to 10 do
Memo1.Lines.Add( C[I]+C[J] );
end;
T+
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)