program fibonacci;
uses crt;
var
x,y,z,n,i:integer;
begin
clrscr;
write(masukkan nilai:');readln(n)
x:=0;
y:=1;
z:=1;
i:=1;
while (i<=n) do
begin
write(z,' ');
i:=i+1;
z:=x+y;
x:=y;
y:=z;
readln;
end.
Maksudnya x:=0;y:=1;z:=1;i:=1; itu apa yakk min? mohon sangat jawabannya
BalasHapusItu variabel counter. Maksudnya x dimulai dari 0, begitu juga y,z,i
BalasHapusDmin mau tany itu yzi nya 1 tp ko x ny beda mksd ny y itu d mulai dr 1 atw gmna ??
BalasHapus