- 谁拿了最多奖学金
- 15 年前 @
怎样读入信息,使每行姓名、分数等分别读入不同的变量或数组?
1 条评论
-
xunide LV 6 @ 15 年前
我用了个很麻烦的方法,不知道有没有简单点的
……
ai:=1;
while true do begin
read(aname[ai]);
if aname[ai]' ' then
ai:=ai+1
else break;
end;
ast[i].name:=copy(aname, 1, ai-1);
read(ast[i].sc1, ast[i].sc2);
repeat read(ast[i].ganbu) until ast[i].ganbu' ';
repeat read(ast[i].west) until ast[i].west' ';
readln(ast[i].lunwen);
……其中aname是字符数组,ast[].name是string
直接read(string)好像把整行都读进来了,刚学这pascal,菜鸟,呵呵
- 1