摘要:
varl,i,tj:longint;a:array['a'..'z']of longint;x,c:char;b:array[0..500]of char;procedure print;begin for i:=1 to l do//要一个一个输出,不能直接w... 阅读全文
posted @ 2016-12-02 21:52
银叶草
阅读(181)
评论(0)
推荐(0)
摘要:
vara,b:array[0..9]of longint;n:longint;procedure print;vari:longint;begin for i:=1 to n do write(a[i]:5);//要保留五个常宽 writeln;en... 阅读全文
posted @ 2016-12-02 21:30
银叶草
阅读(198)
评论(0)
推荐(0)

浙公网安备 33010602011771号