Sequência de Fibonacci
Publicado por Santiago Staviski (última atualização em 12/11/2009)
[ Hits: 14.017 ]
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.
Números primos (usando arrays)
Crivo de Eratóstenes Simples em Ada 95
Achar o maior e o menor valor inserido pelo usuario
Nenhum coment�rio foi encontrado.
Atualizando o Passado: Linux no Lenovo G460 em 2025
aaPanel - Um Painel de Hospedagem Gratuito e Poderoso
O macete do Warsaw no Linux Mint e cia
Git config não aplica configurações
O que você quer para sua vida ao usar o Linux?
Visualizar arquivos em formato markdown (ex.: README.md) pelo terminal
Já estou acreditando que não há limites... (3)
Teclado n~ao escreve abnt2 (8)
Linux mint só reproduz vídeos em navegadores se estiverem mutados [RES... (2)