Программа на Pascal для считывания типизированного файла и вывода информации на экран:

program ReadTypedFile;
type
Employee = record
Name: string;
Age: integer;
Department: string;
end;
var
inputFile: text;
emp: Employee;
begin
Assign(inputFile, 'employees.txt');
Reset(inputFile);
while not EOF(inputFile) do
begin
Readln(inputFile, emp.Name);
Readln(inputFile, emp.Age);
Readln(inputFile, emp.Department);
Writeln('Employee Information:');
Writeln('Name: ', emp.Name);
Writeln('Age: ', emp.Age);
Writeln('Department: ', emp.Department);
Writeln;
end;
Close(inputFile);
end.

Предполагается, что файл "employees.txt" содержит данные сотрудников в следующем формате:

John Doe
30
IT
Alice Smith
25
HR

Вы можете модифицировать программу, чтобы поддерживать другие типизированные файлы и добавить обработку ошибок.