Ошибка при указании типа строки в Паскале - PullRequest
Новая
       59

Ошибка при указании типа строки в Паскале

0 голосов
/ 26 сентября 2019

Я определяю новый тип строки в моем паскаль-коде после имени файла Программы и перед переменными, но он выдает ошибку «Начало», ожидаемая найденная строка 20.

Program Input_try_1;

Type Str20 : string[20];

Var f: file of Str20;
    x : String;
    EOF : Boolean;
begin
    EOF := False;
    Assign(f,'Dic.txt');
    Rewrite(f);

    Writeln('When you finish enter <End>');

    While EOF = false do 
        begin
            Readln(x);
            If x = 'End' then EOF := True
            else Write(f,x);
        end;


    Close(f);

End.

Я ожидаю, что 'Тип Str20: string [20];не выдаст никаких ошибок и не сможет понять проблему.

1 Ответ

2 голосов
/ 26 сентября 2019

В объявлениях типов вы используете знак равенства, а не двоеточие, например: 

 Type Str20 = String[20]

Кстати, вам не нужно определять свой собственный EOF, вы можете использовать встроенный EOFфункция: 

while not Eof(x) do ...

Таким образом, вам не нужно End в исходном файле.

...