ALGORITMOS E IMPLEMENTAÇÕESCódigo fonte Fibonacci Pascal

Implementação de equações dentro da computação, programação e algoritmos.

Moderador: [ Moderadores TTB ]

Avatar do usuário
Autor do Tópico
pensadornato
Avançado
Mensagens: 124
Registrado em: Qua 22 Jun, 2016 22:06
Última visita: 13-07-20
Localização: Jaraguá do sul/SC
Mai 2018 19 16:46

Código fonte Fibonacci Pascal

Mensagem não lida 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
    Respostas
    Exibições
    Última msg

Voltar para “ALGORITMOS E IMPLEMENTAÇÕES”