主题：小儿科题,但不懂
xsbccf
[专家分：20] 发布于 2006-07-12 10:00:00
程序PROGRAM p1(Output); VAR a:ARRAY[1..4]OF Char; c,ch:Char; BEGIN FOR ch:='A' TO 'D' DO a[Ord(ch)-Ord('A')+1]:=ch; FOR ch:='A' TO 'D' DO BEGIN FOR c:=ch TO'D'DO Write(a[Ord(c)-Ord('A')+1]; Writeln END END.
结果是什么呀?
回复列表 （共9个回复）
沙发
贺天行宝 [专家分：2300] 发布于 2006-07-12 20:36:00
ABCD
BCD
CD
D
你自己运行一下不就知道了？！？！
板凳
tl3shi [专家分：110] 发布于 2006-07-23 11:24:00
我也不懂 但是可以运行一下就＂ＯＫ＂了 ！！对吧！
3 楼
晶星 [专家分：370] 发布于 2006-07-25 19:32:00
格式要打好来
4 楼
7free [专家分：10] 发布于 2006-07-30 10:23:00
abcd
bcd
cd
d
5 楼
南飞的大雁 [专家分：50] 发布于 2007-10-29 16:56:00
ABCD
BCD
CD
D
这么简单,你自己读应该能读出来,读不出来就自己运行喽.
[fly]好好做！[/fly]
[em12]
6 楼
xujunxun [专家分：0] 发布于 2007-10-29 16:59:00
运行一下:
abcd
bcd
cd
d
7 楼
Wang--Xiang [专家分：20] 发布于 2007-10-29 19:36:00
4、5、6楼的，PAY ATTENTION TO 大小写！！！！！
ANSWER：
ABCD
BCD
CD
D
8 楼
南飞的大雁 [专家分：50] 发布于 2007-10-29 19:48:00
[em2][em2][em2][em2][em2][em2][em2][em2][em2]
[fly]哈哈哈！[/fly]
9 楼
wyc4662 [专家分：0] 发布于 2007-11-03 16:29:00
ABCD
BCD
CD
D
我来回复
您所在位置：