Ввод и вывод информации через дисковое пространство (файлы) может осуществляться двумя путями:

1. явное указание имени файла, как переменной;
2. замена стандартного ввода / вывода.

Файл можно использовать либо ТОЛЬКО для чтения, либо ТОЛЬКО для записи информации. Записывать и считывать информацию из файла нельзя.

из файла

var 
  fin: textfile;
  a, b, c: integer;
 
begin
  assign(fout,'example.txt'); {сопоставляем имени fout файл на диске example.txt}
  reset(fout); {открываем файл на считывание с начала файла}
 
  readln(fout,a,b,c); {считывем три целых числа из файл fout}
 
  close(fout) {закрываем файл}
end.

в файл

var 
  fout: textfile;
  a, b, c: integer;
 
begin
  assign(fout,'example.txt'); {сопоставляем имени fout файл на диске example.txt}
  reset(fout); {открываем файл на считывание с начала файла}
 
  readln(fout,a,b,c); {считывем три целых числа из файл fout}
 
  close(fout) {закрываем файл}
end.

в файл

var 
  x: integer;
  a: real;
 
begin
  read(x); {Сохранит введенное с клавиатуры в переменную x}
  readln(a); {Сохранит введенное с клавиатуры в переменную a и добавит перевод строки}
end.