我们如何在同一行读取多个条目？

Question

我想在同一行输入两个或多个条目。 如何让程序读取2个或更多条目？

begin
   Write(' Input student namer and his/her score for the math test ');
   readln(names[i],mark[i]);
   Writeln;
end;