Algoritmo Fibonacci na linguagem Pascal.

• Download Fibonacci (Pascal).txt
• Enviar nova versão

Esconder código-fonte

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.

Programa lê nome (básico) - Pascal para iniciantes

script para ler um vetor e mostrar o conteúdo

média de uma turma

programa para selecionar os números em posições impares em array de 19 espaços e calcular a media

Calculadora de décimo terceiro salário(Lazarus)

Nenhum comentário foi encontrado.