[@Rafa3L]

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
 sl: TStrings;
 s: string;
 m: array of array of integer;
 i: integer;
begin
 sl:= TStringList.Create;
 sl.LoadFromFile('SomeText.txt');
 SetLength(m, 2, sl.Count);
 for i:=0 to sl.Count - 1 do
  begin
   s:= sl.Strings[i];
   m[0, i]:= StrToInt(Copy(s, 1, Pos(' ', s)-1));
   m[1, i]:= StrToInt(Copy(s, Pos(' ', s), Length(s)));
  end;
 sl.Free;
end;

4250