高考问答刺身料理的特点:profox问题
来源：百度文库 编辑：高考问答 时间：2024/04/28 03:21:56
clear
set talk off
x=1
k=1
m='y'
do while m=='y'
h=m
input "请输入计算范围值n=" to i
?"你输入值i=", i
accept "确认(y/n)？" to l
if l=='y'
do while x<=i
k=k*x
x=x+1
enddo
?"结果为"
?k
else
if l=='n'
?"你放弃输入"
h='n'
endif
endif
if m== 'n'
else
if h=='y'
?"重新输入i值"
else
accept "继续输入吗？y/n:" to m
endif
?"你已经退出!"
exit
endif
enddo
set talk on
互联驿站 免费算命免费在线算命：http://cqallen.611.cn
set talk off
x=1
k=1
m='y'
do while m=='y'
h=m
input "请输入计算范围值n=" to i
?"你输入值i=", i
accept "确认(y/n)？" to l
if l=='y'
do while x<=i
k=k*x
x=x+1
enddo
?"结果为"
?k
else
if l=='n'
?"你放弃输入"
h='n'
endif
endif
if m== 'n'
else
if h=='y'
?"重新输入i值"
else
accept "继续输入吗？y/n:" to m
endif
?"你已经退出!"
exit
endif
enddo
set talk on
互联驿站 免费算命免费在线算命：http://cqallen.611.cn
?????