Triângulo de Pascal

O triângulo de Pascal até a linha de ordem 25

O triângulo de Pascal até a linha de ordem 25

e o programa para gerá-lo com qualquer número de linhas

Esta função define os números combinatórios e em um defeito que você pode corrigir, ela aceita que p seja maior do que n e na verdade aceita quaisquer valores para n,p e basta colocar um if() para evitar isto.

define c(n,p) {
if (p == 0) return 1;
else if (p == 1) return n;
else if (p == n) return 1;
else return c(n-1,p-1) + c(n-1,p);
}

e esta função é apenas para gerar o triângulo

define EscreveTriangulo(n) {
local k = 0, p = 0;
while (k <= n) {
p = 0;
while (p <= k) {
printf(“%f “,c(k,p));
p++;
}
printf(“\n”);
k++;
}
}

Em calc, que é uma linguagem de programação distribuida livremente, e de precisão infinita, abra um terminal do calc e leia estas funções ou raspe e cole.

Depois digite  EscreveTriangulo(n) com o valor de n de sua escolha. Com n=25 levou um minuto para produzir o triângulo na minha caixinha Linux.

Divirta-se!

Tarcisio

Deixe uma resposta

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair / Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair / Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair / Alterar )

Foto do Google+

Você está comentando utilizando sua conta Google+. Sair / Alterar )

Conectando a %s