Sequência de Fibonacci
Publicado por Santiago Staviski (última atualização em 12/11/2009)
[ Hits: 13.713 ]
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.
Soma dois Valores e exibe o resultado
mais um modelo de programa com vetor
Existência de triângulo, em Pascal
soma da diagonal principal de uma matriz
Nenhum comentário foi encontrado.
Compartilhando a tela do Computador no Celular via Deskreen
Como Configurar um Túnel SSH Reverso para Acessar Sua Máquina Local a Partir de uma Máquina Remota
Configuração para desligamento automatizado de Computadores em um Ambiente Comercial
Como renomear arquivos de letras maiúsculas para minúsculas
Imprimindo no formato livreto no Linux
Vim - incrementando números em substituição
Efeito "livro" em arquivos PDF
Como resolver o erro no CUPS: Unable to get list of printer drivers
Não to conseguindo resolver este problemas ao instalar o playonelinux (1)
Excluir banco de dados no xampp (1)
[Python] Automação de scan de vulnerabilidades
[Python] Script para analise de superficie de ataque
[Shell Script] Novo script para redimensionar, rotacionar, converter e espelhar arquivos de imagem
[Shell Script] Iniciador de DOOM (DSDA-DOOM, Doom Retro ou Woof!)
[Shell Script] Script para adicionar bordas às imagens de uma pasta