nâng cao lên nha ( kiểm tra một số có thuộc dãy Fibonaci không ) 19/07/2021 Bởi Skylar nâng cao lên nha ( kiểm tra một số có thuộc dãy Fibonaci không )
Dãy Fibonacci là dãy vô hạn các số tự nhiên bắt đầu bằng 1 và 1, sau đó các số tiếp theo sẽ bằng tổng của 2 số liền trước nó VD: Số 3 Bình luận
FUNCTION FIBO(n:integer):boolean;Var f1, f2, f:integer;BeginF1:=0;F2:=1;F:=f1+f2;While f<n doBeginF1:=f2;F2:=f;F:=f1+f2;End;If f=n then FIBO:=trueElseFIBO:=false;End; kha@# chúc bn hc tốt # god Bình luận
Dãy Fibonacci là dãy vô hạn các số tự nhiên bắt đầu bằng 1 và 1, sau đó các số tiếp theo sẽ bằng tổng của 2 số liền trước nó
VD: Số 3
FUNCTION FIBO(n:integer):boolean;
Var f1, f2, f:integer;
Begin
F1:=0;
F2:=1;
F:=f1+f2;
While f<n do
Begin
F1:=f2;
F2:=f;
F:=f1+f2;
End;
If f=n then FIBO:=true
Else
FIBO:=false;
End;
kha@# chúc bn hc tốt # god