test31.bas « tests « bastest « examples « apps - nuttx - Port of the Nuttx operating system (http://www.nuttx.org/) to the Kinetis K20 architecture.

summary refs log tree commit diff

path: root/apps/examples/bastest/tests/test31.bas

blob: d168bd072b991e219fd3b58d5f686374bc128180 (plain) (blame)

10 for i=-8 to 8
20   x=1+1/3 : y=1 : j=i
30   for j=i to -1 : x=x/10 : y=y/10 : next
40   for j=i to 1 step -1 : x=x*10 : y=y*10 : next
50   print x,y
60 next