主题:[讨论]编一个简单的计算器
我想编一个简单的计算器,要求输入整条运算式子,例如: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
以上还没有考虑到输入不正确的情况,我能力有限,不能考虑周到,望各位前辈指导
下面是我的一个苯方法,请大家指教一下
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
以上还没有考虑到输入不正确的情况,我能力有限,不能考虑周到,望各位前辈指导