qbasic程序运行结果

发布网友发布时间：2024-09-05 19:19

共1个回答

热心网友时间：2024-09-30 11:42

Copyright
by
ZhouFangZhe
shi
fou
kai
shi?1
danjia:5
shuliang:6
5
6
30
anything
to
buy?5
程序运行后要求输入
是否购买
输入
1时表示确定购买
输入非1则程序结束
然后要求输入
单价
再输入
数量
显示出
单价
*
数量
*
总价
然后问是否继续购买
输入
1则表示
继续购买
否则就付款
最后输出应付款
实付款
按此意思
程序适合改为下面
CLS
PRINT
"Copyright
by
ZhouFangZhe"
INPUT
"shi
fou
kai
shi?",
a
IF
a
=
1
THEN
GOTO
zz
IF
a
<>
1
THEN
END
DO
zz:
INPUT
"danjia:",
dja
INPUT
"shuliang:",
sla:
jga
=
dja
*
sla:
PRINT
dja,
sla,
jga
INPUT
"anything
to
buy?",
yna
aa
=
aa
+
jga
LOOP
UNTIL
yna
=
0
IF
yna
=
0
THEN
PRINT
"qing
fu
kuan!"
INPUT
"shi
shou:",
oo:
uu
=
oo
-
aa
PRINT
oo,
uu
IF
uu
<
0
THEN
PRINT
"fu
kuan
bu
zu!"
PRINT
"Thank
you
to
use!"