home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / lifeos2.zip / LIFE-1.02 / TESTS / IN / VARLEVEL.I00 < prev    next >
Text File  |  1996-06-04  |  425b  |  58 lines
  1. A=1?
  2. (write(1);write(2);write(3))?
  3. B=5?
  4. ;
  5. ;
  6. ;
  7. ;
  8.  
  9. nl,write("***************")?
  10. (write(1);write(2);write(3))?
  11. B=5?
  12. ;
  13. ;
  14. ;
  15.  
  16. nl,write("***************")?
  17. A=1?
  18. (write(1);write(2);write(3))?
  19. true?
  20. ;
  21. ;
  22. ;
  23.  
  24. nl,write("***************")?
  25. A=1?
  26. X={1;2;3}?
  27. B=5?
  28. ;
  29. ;
  30. ;
  31. ;
  32. ;
  33.  
  34. nl,write("***************")?
  35. A=1?
  36. X={1;2;3}?
  37. true?
  38. ;
  39. ;
  40. ;
  41. ;
  42.  
  43. nl,write("***************")?
  44. X={1;2;3}?
  45. B=5?
  46. ;
  47. ;
  48. ;
  49. ;
  50.  
  51. nl,write("***************")?
  52. X={1;2;3}?
  53. true?
  54. ;
  55. ;
  56. ;
  57.  
  58.