在PASCAL中将文本文件读入数组

我有一个文本文件“text.txt”，其中包含

48 42

我正在尝试读取文本文件并将其分配到数组中。之后，我尝试将数字分配到num1和num2变量中

下面是我现在拥有的。由于某些原因，它不使用数组索引分配数字

program tutorial15;
  var
    infile, outfile: text;
    inputchar: char;
    num1: integer;
    num2: integer;
  begin
    assign(infile, 'text.txt');
    reset(infile);
    while not eof(infile) do
      begin
        while not eoln(infile) do
          begin
            read(infile, inputchar);
          end;
          num1 := inputchar[0];
          num2 := inputchar[1];
      end;
    writeln('Number1: ', num1);
    writeln('Number2: ', num2);
  end.

---

我是帕斯卡新手，请让我知道我能做些什么来解决这个问题

您没有将任何内容放入数组，因为您没有数组。您声明了

inputchar:char，它是单个字符。单个字符没有数组索引。返回课程笔记，重新阅读有关数组的部分。您的文本文件还将包含三个字符，而不是两个字符-它们之间的空格也是一个字符。实际上，再次阅读您的文章时，您的文本文件包含5个字符，因为每个数字都是一个字符，而两对字符之间的空格也是一个字符。
program readtoarray;
var
        f: TextFile;
        i: Integer;
        a: array [0..1] of Integer;
begin
        assign(f, 'text.txt');
        reset(f);
        i := 0;
        while not eof(f) do begin
                read(f, a[i]);
                inc(i);
        end;
        close(f);
        for i := 0 to 1 do writeln('Number', i+1, ': ', a[i])
end.