宝拉x pola x:profox问题
来源:百度文库 编辑:中科新闻网 时间:2024/10/03 15:20:59
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
?????