Endif Return
【例7-13】编程计算银行存款整存整取应得的利息。 Clear
Input \本金(元):\ Input \存期(年):\ Do case Case cq>=5
Rate=4.5 &&年利率为4.5% Case cq>=3
Rate=3.6 &&年利率为3.6% Case cq>=2
Rate=3.1 &&年利率为3.1% Case cq>=1
Rate=2.7 &&年利率为2.7% Case cq>=0.5
Rate=2.21 &&年利率为2.21% Other wise
Rate=1.23 &&年利率为1.23% End case
Lixi=bj*cq*rate/100
? &&输出一个空行 ? \应得利息:\Return
【例7-14】求1+2+3+?+100的累计值 Clear
Store 0 to n,s Do while n<100 n=n+1 s=s+n enddo
? \累计值为:\
第 6 页 共 7 页
Return
【例7-18】用步长型循环结构编程求1+2+3+?+100的累计值 Clear s=0
for n=1 to 100 s=s+n end for ? \ Return
四、操作题: 1、建立数据表
①文件->新建->选择弹出的“新建”对话框中的“表”后->单击“新建文件”按钮。 ②在“创建”对话框中设定保存的文件夹的位置及文件名->保存
③“表设计器”->字段->输入各字段的字段名、类型和宽度,数值型需指定其小数位数->确定->询问对话框“现在输入数据记录吗?”->是->出现录入界面(->否->结束表结构建立,以后再录入)
2、建立数据库
文件->新建->数据库->新建文件->创建->选定存入位置及名称->保存->“数据库设计器”窗口及“数据库设计器”工具栏->对新建数据表或已有数据表添加并进行其他有关操作
3、建立程序
①文件->新建->程序->新建文件
②在程序窗口中输入和编辑程序代码的具体内容 ③文件->保存(Ctrl+W)->选定存入位置及名称->保存
第 7 页 共 7 页