Sequência de Fibonacci
Publicado por Santiago Staviski (última atualização em 12/11/2009)
[ Hits: 14.216 ]
Homepage: http://allenkonstanz.blogspot.com
Download questaovalendoponto02.pas
O programa pede ao usuário um número qualquer inteiro e também que informe a quantidade de números da sequência Fibonacci que deseja ver.
Como saída ele informa o número inicial fornecido pelo usuário e em seguida a sequência Fibonacci desse número.
program fibo;
var qnt,numero,anterior,contador,soma: integer;
BEGIN
write('Informe um numero: ');
read(numero);
write('Informe a quantidade de numeros que deseja ver da sequencia fibonacci: ');
read(qnt);
contador:=0;
soma:=0;
anterior:=numero-1;
while (contador<qnt) do
begin
write(numero,' ');
soma:=numero+anterior;
anterior:=numero;
numero:=soma;
contador:=contador+1;
end;
END.
mais um modelo de programa com vetor
calculo de porcentagem em vetores
vendas de uma empresa em matriz
Exemplo de for que mostra 6 números em ordem crescente
Nenhum comentário foi encontrado.
Cirurgia para acelerar o openSUSE em HD externo via USB
Void Server como Domain Control
Modo Simples de Baixar e Usar o bash-completion
Monitorando o Preço do Bitcoin ou sua Cripto Favorita em Tempo Real com um Widget Flutuante
[Resolvido] VirtualBox can't enable the AMD-V extension
Como verificar a saúde dos discos no Linux
Como instalar , particionar, formatar e montar um HD adicional no Linux?
Como automatizar sua instalação do Ubuntu para desenvolvimento de software.
Não consigo instalar distro antiga no virtualbox nem direto no hd (15)
Quais os códigos mais dificeis que vcs sabem fazer? (12)
systemd-resol... precisa ser reiniciado periodicamente [RESOLVIDO] (7)









