点这里查看
讨论 / 晕了，这是怎么回事？
anshantby 2012-07-07 23:04:00
点我顶贴 收藏 删除
测试结果错误.错误结果为:

YDCmkIYBPOy

15000

332750

正确结果应为:YDCmkIYBPOy

15000

332750

测试结果错误.错误结果为:

IXrLPdJhEekBRgsbkqI

15850

315050

正确结果应为:IXrLPdJhEekBRgsbkqI

15850

315050

测试结果错误.错误结果为:

IXrLPdJhEekBRgsbkqI

15850

315050

正确结果应为:IXrLPdJhEekBRgsbkqI

15850

315050

测试结果错误.错误结果为:

HHeXOMfgB

15000

311200

正确结果应为:HHeXOMfgB

15000

311200

测试结果错误.错误结果为:

IlB

14000

320050

正确结果应为:IlB

14000

320050

测试结果错误.错误结果为:

DGMqW

15000

350700

正确结果应为:DGMqW

15000

350700

测试结果错误.错误结果为:

F

15000

324650

正确结果应为:F

15000

324650

测试结果错误.错误结果为:

YBqilxkGZJx

15000

366150

正确结果应为:YBqilxkGZJx

15000

366150

测试结果错误.错误结果为:

YBqilxkGZJx

15000

366150

正确结果应为:YBqilxkGZJx

15000

366150

测试结果错误.错误结果为:

YBqilxkGZJx

15000

366150

正确结果应为:YBqilxkGZJx

15000

366150

两个writeln，一个write

大家帮忙分析一下

#1 anshantby@2008-05-02 08:13:00
回复 删除
不是吧？我读完之后加个readln就对了？太……了吧？

虽然汉语言文字博大精深，可是这件事似乎也许可能或者大概找不到一个合适的词语来形容了

#2 hzyfr@2012-07-07 22:59:00
回复 删除
不加readln你就把行结束的换行符读到你的串里了 那样一开头就是 换行
#3 hzyfr@2012-07-07 23:04:00
回复 删除
我可以猜出来你写了什么

repeat read(c); until c<>' ';

while c<>' ' do begin s:=s+c;read(c);end;

(c:char s:string)

我们来看下输入，

XXX 80 80 Y N 2↓(↓表示换行符)

yyy (.........)

读第一行的语句，现在读到2这个地方，下一个字符是换行

然后 repeat read(c);将读到换行符，并且通过s:=s+c 给你的字符串

最后你的字符串会变成↓XXX

查看更多回复
提交回复