BAT批处理实现Fibonacci函数

小无聊一下，不过真的很强大……

@echo off
 
setlocal
 
set x=10
 
call :fib %x% y
echo fib^(%x%^)=%y%
goto :eof
 
:fib [in]x [out]result
setlocal
set a=%1
set d=1
set e=0
 
if %a% leq 1 (
  goto fibret
)
 
set /a b=%a%-1
set /a c=%a%-2
call :fib %b% d
call :fib %c% e
 
:fibret
endlocal & set /a %2=%d%+%e% & goto :eof

输出是“fib(10)=89”