Через операторы ввода: readln();вывода: writeln();или через файл, предварительно надо добавить текстовые переменные, сохранить программу в папку где будут входные данные, в ходе выполнения программы будет создан выходной файл, в конце необходимо закрыть файлы: var t,f:text;a,b,c:integer;beginassign (t,'input.txt');assign (f,'output.txt');rewrite (t);reset (f);read (t,a,b,c);close (t);close(f):end.
