Sequência de Fibonacci
Publicado por Santiago Staviski (última atualização em 12/11/2009)
[ Hits: 14.260 ]
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.
Extenso em dll, com parâmetros adicionais
Calculadora utilizando until e case
programa pra carregear duas matrizes e achar o maior
Nenhum comentário foi encontrado.
WhatsApp com Chamadas no Linux via Waydroid
XFCE - quase um Gnome ou Plasma mas muito mais leve
LXQT - funcional para máquinas pererecas e usuários menos exigentes
Manutenção básica para Gentoo Linux (com script)
Conheça o Zashterminal, um terminal moderno com IA
DOOM Carniceiro: rode o Meatgrinder com uzdoom (Gentoo e Ubuntu)
Samba 4 AD-DC 2026: Como instalar e configurar um Active Directory (via APT-GET)
[Resolvido] Sumiço de redes e micro quedas no iwd/iwgtk (Realtek rtw88)









