test07.bas « tests « bas « examples « apps - px4-nuttx - Standard NuttX (http://nuttx.org) with current PX4 WIP patches

summary refs log tree commit diff

path: root/apps/examples/bas/tests/test07.bas

blob: 12c0cbdc7fbeca9d6beda0935be6a56fa573b0e0 (plain) (blame)

10 def fna(x)
20   if x=0 then r=1 else r=x*fna(x-1)
30 =r
40 print fna(7)