Вывод содержимого файла на экран (Fatal: Syntax error)

uses crt;
        type gogi = record
        time, ticket, money: string;
        end;
        const
        z = 15;
var n,t : integer;
 
    avia: array [1..z] of gogi;
    A : text;
    B : text;
    C : text;
    D : text;
    Assign(A, 'Air1.txt');
    Assign(B, 'Air2.txt');
    Assign(C, 'Air3.txt');
    Assign(D, 'Air4.txt');
    begin
writeln('‚Выберите компанию');
writeln('1.Аэрофлот');
writeln('2.’Авиатранс');
writeln('3.UTair');
writeln('4.‘Сибирь');
readln(n);
readln(t);
case n of
1:reset(Air1.txt);
2:reset(Air2.txt);
3:reset(Air3.txt);
4:reset(Air4.txt);
end;
writeln(n,st);
close;
end.

uses crt;
 
type gogi = record
        time, ticket, money: string;
end;
 
const
   z = 15;
   names : array[1 .. 4] of string = ('Air1.txt', 'Air2.txt', 'Air3.txt', 'Air4.txt');
 
var 
   n,t : integer;
   avia: array [1..z] of gogi;
   f : text;
 
begin
   writeln('‚Выберите компанию');
   writeln('1.Аэрофлот');
   writeln('2.’Авиатранс');
   writeln('3.UTair');
   writeln('4.‘Сибирь');
 
   readln(n);
 
   Assign(f, names[n]); Reset(f)
   // дальше делай с файлом f то, что нужно
   close(f);
end.