计算机程序设计基础.docx
- 文档编号:6640360
- 上传时间:2023-01-08
- 格式:DOCX
- 页数:12
- 大小:28.62KB
计算机程序设计基础.docx
《计算机程序设计基础.docx》由会员分享,可在线阅读,更多相关《计算机程序设计基础.docx(12页珍藏版)》请在冰豆网上搜索。
计算机程序设计基础
程序与程序文件
以前所学的在命令窗口中逐条输入命令或选择菜单来执行命令是以交互方式来操作。
一、程序:
能够完成一定任务的命令的有序集合。
这组命令被存放在称为程序文件或命令文件的文本文件中。
settalkoff设置交互方式开关为关
settalkon。
。
。
。
。
。
。
。
。
。
。
。
。
开
return退出程序
以note或*开头的代码行为注释行。
无实际意义
命令行后也可添加注释,以&&开头。
无实际意义
命令分行符“;”程序中每条命令都以回车键结尾,一行只能写一条命令
例:
计算圆的周长与面积:
Clear&&清除VFP主窗口或当前用户自定义窗口里的全部内容
*设置半径
r=3
*依次计算周长和面积
P=2*pi()*r&&函数pi()返回圆周率
a=pi()*r^2
*输出计算结果
?
“周长=”,p
?
“面积=”,a
return
二、程序文件的建立与执行
1、建立与修改(默认扩展名prg)
建立步骤:
“文件”—“新建”—“程序”
在文本编辑窗口输入程序内容。
保存程序文件:
“文件”—“保存”或ctrl+w
打开修改程序文件步骤:
Ø“文件”—“打开”,“文件类型”—“程序”
Ø选定文件文件,单击“确定”
Ø编辑修改后,选择“保存”。
若要放弃本次修改,“文件”—“还原”或按Esc键。
用命令建立和修改:
modifycommand<文件名>
注:
文件名可以写全称,也可以省略扩展名
若指定的文件名存在,则打开修改;若不存在,则建立一个新文件
2、执行程序文件
Ø菜单方式:
“程序”—“运行”,然后从文件列表框中选择程序文件,单击“运行”
Ø命令方式:
do<文件名>
文件中的一些命令:
a)cancal:
终止程序运行,清除所有的私有变量,返回命令窗口
b)do:
转移执行另一个程序(实现程序的嵌套)
c)return:
结束当前程序的执行,返回调用它的上级程序,若无上级程序则返回到命令窗口。
d)quit:
退出VFP系统,返回到操作系统。
3、简单的输入输出命令(三种)
Øinput[<字符表达式>to<内存变量>]
该命令等待用户从键盘输入数据,可输入任何类型的合法的表达式。
输入字符串、逻辑型常量、日期时间型常量时必须加定界符。
不能不
输任何内容直接按回车。
例:
opendatad
use学生in0
clear
input’请输入年龄:
’tomm
sele*from学生where年龄>mm
closedata
return
Øaccept[<字符表达式>to<内存变量>]
该命令等待用户从键盘输入字符串,且该命令只能输入字符串,输入时不需要加定界符。
若不输入任何内容按回车,系统会把空串赋给内存变量。
Øwait[<字符表达式>[to<内存变量>][window[at<行>,<列>]][….]
该命令只能输入字符串,不用按回车,直接自动执行
例:
opendatad
use11in0
wait‘输入查询的姓:
’toss
sele*from11where姓名=ss
closedata
return
三、程序的基本结构
程序结构是指程序中命令或语句执行的流程结构。
三种基本结构:
顺序结构、选择结构、循环结构
1、选择结构(条件语句和分支语句)
Ø条件语句:
if<条件>注意:
if和endif必须成对出现,if是本结
<语句系列1>构的入口,endif是出口;条件语句
[else可以嵌套,但不能交叉。
系统规定
<语句系列2>]endif与最近的一条if配对。
endif
例:
某地至北京的邮路里程为1043KM,“特快专递”时应在24小时内到达,计费标准每克0.05元,但超过100克后,超出的每克0.02元。
试编写程序计算邮费。
Input‘请输入邮件重量:
’tow
Ifw<=100
f=w*0.05
else
f=100*0.05+(w-100)*0.02
endif
?
’邮费为:
’,f
例:
opendatad
use11
accept‘请输入学生姓名:
’toname
locatefor姓名=name
ifnoteof()
disp
else
?
’查无此人!
’
endif
closedata
Ø分支语句
docase
case<条件1>
<语句序列1>
case<条件2>
<语句序列2>
……..
[otherwise
<语句序列>]
endcase
例:
计算分段函f(x)=
settalkoff
input‘输入X的值:
’tox
docase
casex<0
f=2*x-1
casex<3
f=3*x+5
casex<5
f=x+1
casex<10
f=5*x-3
otherwise
f=7*x+2
endcase
?
‘f(’,’x’,’)=’,f
settalkon
return
2、循环结构(三种)
dowhile<条件>
循环体
enddo
注意:
当循环体包含exit命令,那么遇到时,就结束该语句的执行,转去执
行enddo后面的语句。
即跳出本层循环。
当循环体包含loop命令,那么遇到时,就结束循环体的本次执行,不
在执行其后面的语句,而是转回dowhile处重新判断条件。
例:
计算s=1+2+3…..+100?
S=0
i=1
dowhilei<=100
s=s+I
i=i+1
enddo
?
‘s=’,s
求1/1!
+1/2!
+1/3!
+…+1/10!
=?
i=1
u=1
s=0
dowhilei<=10
u=u/i
s=s+u
i=i+1
enddo
?
s
例7.8:
逐条输出1982年出生的学生记录。
Clear
opendata学生
use学生in0
sele学生
locateforyear(出生日期)=1982
dowhilenoteof()
display
wait
continue
enddo
closedata
3、for<循环变量>=<初值>to<终值>[step<步长>]
<循环体>
endfor/next
步长默认值为1,若为正,则判断条件为循环变量小于等于终值;若为负,
则判断条件为循环变量大于等于终值。
Fors=2to100step4
Fors=100to2step-4
例:
找出100-999之间的所有‘水仙花数’。
Clear
fori=100to999
a=int(i/100)
b=int((i-100*a)/10)
c=i-int(i/10)*10
ifi=a^3+b^3+c^3
?
i
endif
endfor
return
例:
从键盘输入10个数,然后找出其中的最大值和最小值。
Clear
input‘输入一个数据:
’toa
storatoma,mi
fori=2to10
input‘请输入一个数:
’toa
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 程序设计 基础