• 🔴 [ENEM 2025 PPL Live 05] Matemática - Resolução de 156 até 160
  • 🔴 [ENEM 2025 PPL Live 04] Matemática - Resolução de 151 até 155
  • 🔴 [ENEM 2025 PPL Live 03] Matemática - Resolução de 146 até 150
  • 🔴 [ENEM 2025 PPL Live 02] Matemática - Resolução de 141 até 145
  • 🔴 [ENEM 2025 PPL Live 01] Matemática - Resolução de 136 até 140
  • 🔴 [ENEM 2025 Belém Live 09] Matemática - Resolução de 176 até 180

ALGORITMOS E IMPLEMENTAÇÕESCódigo fonte Fibonacci Pascal

Implementação de equações dentro da computação, programação e algoritmos.
Avatar do usuário
pensadornato Offline
Avançado
Mensagens: 124
Registrado em: 22 Jun 2016, 22:06
Localização: Jaraguá do sul/SC
Agradeceu: 31 vezes
Agradeceram: 23 vezes
Mai 2018 19 16:46

Código fonte Fibonacci Pascal

Mensagem por pensadornato »

Código: Selecionar todos

program Fibonacci;

uses crt;

var intA,intB,intProx,intCont:integer;

begin

clrscr;

intA:=0;
intB:=1;
for intCont:=1 to 15 do

begin
intProx:=intA+intB;
Writeln(intProx);
intA:=intB;
intB:=intProx;

end;

readln;

end.
O homem não é nada sem o ser e o agir,o ser é o que tu é,e o agir é sua atitude.
Responder
  • Tópicos Semelhantes
    Resp.
    Exibições
    Últ. msg

Voltar para “ALGORITMOS E IMPLEMENTAÇÕES”