Файлы

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

явное указание имени файла, как переменной;

замена стандартного ввода / вывода.

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

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.