n in ra các số fibonaci

2 câu trả lời

FUNCTION FIB(x:integer):integer;
Begin
 if x<=2 then fib:=1;
 if x>=3 then
 fib:=fib(x-1)+fib(x-2);
End;

chúc bn hc tốt # tôi đang pùn vì mn cứ bảo tôi buff điểm

Function fib(a: byte): longword;
Begin
     fib(1):=1; fib(2):=1;
     if a>=3 then
     fib:=fib(x-1)+fib(x-2);
End;

Câu hỏi trong lớp Xem thêm