回 帖 发 新 帖 刷新版面

主题:[讨论]编一个简单的计算器

我想编一个简单的计算器,要求输入整条运算式子,例如:1+1=,然后输出结果
下面是我的一个苯方法,请大家指教一下
INPUT A$
X=LEN(A$)
FOR I= 1 TO X
IF VAL(MID$(A$,I,1))=0
THEN EXIT FOR
END IF
N=N+1
NEXT
B$=LEFT$(A$,N)
C$=MID$(A$,N+2,X-N-2)
D$=MID$(A$,N+1,1)
B=VAL(B$)
C=VAL(C$)
SELECT CASE D$
CASE "+"
PRINT B+C
CASE "-"
PTINT B-C
CASE "*"
PRINT B-C
CASE"/"
PRINT B/C
END SELECT
END
以上还没有考虑到输入不正确的情况,我能力有限,不能考虑周到,望各位前辈指导

回复列表 (共11个回复)

11 楼

to 5楼:文曲星上的是gvbasic好不好

我来回复

您尚未登录,请登录后再回复。点此登录或注册