主题：关于输入的问题(pascal的)(较难)
brianzf
[专家分：30] 发布于 2005-08-02 11:17:00
怎样输入一组数据,并以回车结束!(不要先输入字符再转化成数据有方法吗?)请大虾多多指教[em1]
回复列表 （共5个回复）
沙发
MagicG [专家分：650] 发布于 2005-08-02 21:05:00
什么叫"!(不要先输入字符再转化成数据有方法吗?)"啊?
怎么看不懂撒?
板凳
davidw017 [专家分：4170] 发布于 2005-08-02 21:51:00
inc(i);
read(a[i]);
如果会车了就不会再读了
3 楼
lzl1403 [专家分：1670] 发布于 2005-08-23 21:13:00
while not eoln do read(n);
4 楼
阿Ben [专家分：2200] 发布于 2005-08-23 23:06:00
var
i:integer;
c:char;
a:array[1..1000]of integer;
begin
i:=0;
repeat
inc(i);
read(a[i]);
read(c);
until c=#13;
end.
5 楼
阿Ben [专家分：2200] 发布于 2005-08-23 23:09:00
以上方法也许可以，我不信你输入的数与数之间没有空格。
我来回复
您所在位置：