回 帖 发 新 帖 刷新版面

主题:初学者题目,望给与帮助

计算两个数的差,判断这个差是正数,还是零,还是负数。

cls
input "a,b";a,b
c=a-b
if c<0 then print "+,zheng shu" else if c=0 then print "0,a=b" else print "-,a<b"
end


这个是对的吗?

但为什么得出的结论不一样  比方说你输入 2,3   正常的应该是,2-3 =-1  他会告诉你是正数。。。。输入3,2  正常应该为 3-2=1 他会告诉你是负数。。。


我感觉这个代码没错啊

回复列表 (共11个回复)

沙发

错!!!
CLS
INPUT "a,b"; a, b
c = a - b
IF c > 0 THEN PRINT "+,zheng shu" ELSE IF c = 0 THEN PRINT "0,a=b" ELSE PRINT "-,a<b"
END

板凳

c<0 then print "+,zheng shu"
c小于0是正数?!!

3 楼

楼主,这里只需用if——then就足矣!

代码如下,我已经实际操作了:

[color=FF0000]CLS
INPUT "a="; a
INPUT "b="; b
c = a - b
IF c > 0 THEN PRINT a; "-"; b; "的差是正数", "a-b="; a - b, "a > b"
IF c = 0 THEN PRINT a; "-"; b; "的差是零", "a-b="; a - b, "a = b"
IF c < 0 THEN PRINT a; "-"; b; "的差是负数", "a-b="; a - b, "a < b"
END[/color]

4 楼

CLS
DIM a, b, c, d AS LONG
INPUT "a = ", a
INPUT "b = ", b
c = a - b: d = SGN(c)
SELECT CASE d
  CASE -1
    PRINT "Fei zheng shu"
  CASE 0
    PRINT "0"
  CASE 1
    PRINT "Zheng shu"
END SELECT
END
利用SGN符号判断

5 楼

[quote]错!!!
CLS
INPUT "a,b"; a, b
c = a - b
IF c > 0 THEN PRINT "+,zheng shu" ELSE IF c = 0 THEN PRINT "0,a=b" ELSE PRINT "-,a<b"
END
[/quote]


不错嘛..

6 楼

用SELECT CASE看得清楚

7 楼

[quote]错!!!
CLS
INPUT "a,b"; a, b
c = a - b
IF c > 0 THEN PRINT "+,zheng shu" ELSE IF c = 0 THEN PRINT "0,a=b" ELSE PRINT "-,a<b"
END
[/quote]

8 楼

楼上为何引用?

9 楼

有什么“企图”?

10 楼

什么意思?

我来回复

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