Процедура для считывания значений переменных

[xPAL]

Недавно узнал, что из текстового файла можно считывать значения переменных не с помощью цикла, как я обычно и делаю, а с помощью некой процедуры. Уважаемые форумчане, если кто нибудь знает эту процедуру, ответьте пожалуйста.

[NieL]

FileRead, FileWrite

[xPAL]

Сообщение от xPAL

из текстового файла

Пример вводной строки которую надо прочесть:
1 2 3 45 103

[Jeni]

Можно считывать несколько значений с помощью процедуры Read или ReadLn в консольном приложении. Например:

var
  F: TextFile;
  X1, X2, X3, X4, X5: Integer;

begin
  AssignFile(F, '000.txt');
  Reset(F);
  Read(F, X1, X2, X3, X4, X5); // Чтение из файла
  CloseFile(F);

  // Вывод на экран
  WriteLn(X1);
  WriteLn(X2);
  WriteLn(X3);
  WriteLn(X4);
  WriteLn(X5);

  // Задержка закрытия окна
  ReadLn;
end.

Но в таком случае нужно знать, сколько значений содержится в строке. Лучше использовать циклы и считывать по одному значению до конча строки или файла.

[xPAL]

Спасибо, число значений известно, т.к это олимпиадные задачи