REPL 价格 WITH 价格*(1-0.1)
DISPLAY 名称,价格
ELSE
WAIT "NOT FOUND!" WINDOW
ENDIF
USE
3.
USE 选课
SCAN FOR 课程号="655" AND 成绩<60
? 学号,课程号,成绩
ENDSCAN
USE
六、对于下列查询要求,写出SQL-SELECT(SELE ---FROM---WHERE)命令。
已知设备表SB(编号C(5),名称C(6),启用日期D,价格N(9,2),部门C(2),主要设备L)
1. 显示所有设备清单;
2. 列出所有车床的编号、名称、启用日期和价格;
3. 列出所有主要设备的编号、名称和价格;
4. 列出价格在10000以上的所有主要设备的名称、启用日期和价格。
SELE 名称,启用日期,价格 FROM SB WHERE 主要设备 AND 价格>10000
六、编程题
1.编写一个程序,让计算机随即产生一个1-999之间的数,然后从键盘输入一个数,如果输入的数比计算机产生的数小,计算机提示“小”的信息,如果所输入的数比计算机产生的数大,则计算机提示“大”的信息,直到猜中计算机所产生的随机数,并报告你所猜的总次数。