回 帖 发 新 帖 刷新版面

主题:庐阳区编程竞赛参加的进!!!

各位!!!!
[fly]竞赛的第一题,输入的加号要打吗?怎么打?[/fly]

回复列表 (共6个回复)

沙发

第一题是什么?

板凳

INPUT X$
P=INSTR(1,A$,"+")
A$=LEFT$(X$,P-1)
B$=MID$(X$,P+1,LEN(X$)-1-LEN(A$))

3 楼


三楼!这是什么东东?
第一题  a+b program
【问题描述】  如题、输入、输出。
【输入格式】 ab.in
输入文件 a+b.in共n+1行。
第一行有一个数字n,表示有n组数据。(1<=n<=1000)。
后面n行每行一个字符串,为“A+B”,A、B均为非负整数,且<=2*10^9。
【输出格式】 ab.out 
输出文件a+b.out共n行,输出每一对A+B的值。
【输入样例1】
1
215+56443562
【输出样例1】
56443777
【输入样例2】
3
0+45
56486+454
1412342343+1454651111
【输出样例2】
45
56940
2866993454
【数据规模】
20%的数据满足:0<=A、B<=16000   40%的数据满足:0<=A、B<=32767
70%的数据,满足:0<=A、B<=10^9   100%0<=A、B<=2*10^9 1<=n<=10000
题目在上[em18]
完整一点好不好
THANKS

4 楼

CLS
INPUT n
DIM q$(n), a(10000), b(10000)
FOR i = 1 TO n
  INPUT q$(i)
NEXT i
FOR p = 1 TO n
  a$ = ""
  b$ = ""
  lq = LEN(q$(p))
  o = INSTR(1, q$(p), "+")
  a$ = LEFT$(q$(p), o - 1)
  b$ = MID$(q$(p), o + 1, lq - 1 - LEN(a$))
  la = LEN(a$): lb = LEN(b$)
  IF lb > la OR b$ > a$ THEN SWAP la, lb: SWAP a$, b$
  n = la + 1
  FOR i = 1 TO la
    a(i) = VAL(MID$(a$, n - i, 1))
  NEXT i
  FOR i = 1 TO lb
    a(i) = VAL(MID$(b$, lb + 1 - i, 1))
  NEXT i
  FOR i = 1 TO la
    x = a(i) + b(i)
    a(i + 1) = a(i + 1) + x \ 10
    a(i) = x MOD 10
  NEXT i
  IF a(n) = 0 THEN n = n - 1
  FOR i = n TO 1 STEP -1
    PRINT MID$(STR$(a(i)), 2);
  NEXT i
  PRINT
  FOR i = 1 TO n: a(i) = 0: b(i) = 0: NEXT i
NEXT p
END

5 楼

文本格式自己加吧,刚刚做的时候忘了加

6 楼

[em1]

我来回复

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