Sequência de Fibonacci
Publicado por Santiago Staviski (última atualização em 12/11/2009)
[ Hits: 13.908 ]
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.
média dos numeros informados em posiçoes pares em um vetor
Cáculo de Fatorial, utilizando-se de Repeat - Until
Nenhum comentário foi encontrado.
Criar entrada (menuentry) ISO no Grub
Como gerar qualquer emoji ou símbolo unicode a partir do seu teclado
Instalando o Pi-Hole versão v5.18.4 depois do lançamento da versão v6.0
Instalar o VIM 9.1 no Debian 12
Como saber o range de um IP público?
Muitas dificuldades ao instalar distro Linux em Notebook Sony Vaio PCG-6131L (VPCEA24FM)
Dock do debian está muito pequena (1)
Instalei Windows 11 e não alterou o Grub do Debian (0)
Linux Mint (21.2) não reconhece teclado mecanico RASEC da PCYES (2)