没readkey的情况
type Tstring=record
s:array[0..maxn] of char; s:array[0.
阅读背景：
PASCAL的读入优化
来源：互联网
分享到：
