Deret Fibonachi adalah salah satu kasus di bidang matematika. deret yang telah ditemukan oleh Fibonachi dengan pola 1 1 2 3 5,dst. Paling asik menghitung deret fibonachi menggunakan turbo pascal.
program fibonachi;
uses wincrt;
var
a:array[1..100] of real;
i,n:integer;
begin
write ( 'insert the number of fibonachi: ');readln(n);
a[1]:=1;
a[2]:=1;
for i:=2 to n do
a[i+1]:=a[i]+a[i-1];
for i:=1 to n do
write (a[i]:2:1,' ');
end.
Ngga yakin??? coba aja!!
selamat mencoba! :D
No comments:
Post a Comment
Thanks for your critics,,