输入格式问题

怎样读入信息,使每行姓名、分数等分别读入不同的变量或数组?

1 条评论

  • @ 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

信息

ID
1001
难度
5
分类
模拟 点击显示
标签
递交数
39311
已通过
12808
通过率
33%
被复制
132
上传者