try.bas
上传用户:afrynkmhm
上传日期:2007-01-06
资源大小:1262k
文件大小:0k
源码类别:

编译器/解释器

开发平台:

Others

  1. PROGRAM ( ChainParameterString$ , DebugMode% )
  2. a$="hello"
  3. x%=2
  4. do until x%=5
  5. x% = x% +1
  6. print x%
  7. loop
  8. do
  9. x%=x%+1
  10. print x%,x%,"To Java Programmer",a$
  11. loop until x%=7
  12. if x% = 1 then
  13. print 21
  14. else if x% = 2 then
  15. print 22
  16. else if x% = 5 then
  17. print 23
  18. else
  19. print 24
  20. end if
  21. for x%=1 to 3
  22. y%=x%
  23. print x% , y%+2
  24. next x%
  25. y% = 2
  26. end