/* Rexx */

Say Fibonacci( 20 )

Exit

/* * */

Fibonacci: procedure
Arg N

If N < 2 then
 Return N
Else
 Return Fibonacci( N - 1 ) + ,
        Fibonacci( N - 2 )