在 Pascal 中给出字符串类型时出错

比萨巴勃罗

我在我的 pascal 代码中在程序文件名之后和变量之前定义了一个新的字符串类型,但它给出了一个错误“开始”预期的 Str20 找到。

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.

我期待 'Type Str20:string[20]; 不会给出任何错误,并且无法理解问题。

马丁·A。

在类型声明中,您使用等号而不是冒号,如下所示:

 Type Str20 = String[20] 

顺便说一句,您不需要定义自己的 EOF,您可以使用内置的 EOF 函数:

while not Eof(x) do ...

这样,您就不需要End源文件中的 。

本文收集自互联网,转载请注明来源。

如有侵权,请联系[email protected] 删除。

编辑于
0

我来说两句

0条评论
登录后参与评论

相关文章

来自分类Dev

计算对象pascal中字符串中的不同字符

来自分类Dev

什么是Pascal风格的字符串?

来自分类Dev

从函数返回字符串(VAX PASCAL)

来自分类Dev

Pascal字符串到指针

来自分类Dev

PASCAL字符串到数组

来自分类Dev

在Pascal中创建课程

来自分类Dev

Pascal中的数字声明

来自分类Dev

Pascal中的抽象函数

来自分类Dev

pascal 中的函数步骤

来自分类Dev

Free Pascal中的RawByteString类型

来自分类Dev

来自Pascal中字符串的格式化输入

来自分类Dev

C ++中Pascal字符串的数据布局

来自分类Dev

我可以在pascal中定义自己的字符串类型吗?

来自分类Dev

C宏将字符串转换为pascal字符串类型

来自分类Dev

C到Pascal类型的转换

来自分类Dev

Pascal-写奇怪的字符

来自分类Dev

Pascal中的双“ else”语句

来自分类Dev

Python中的Pascal“ var parameter”

来自分类Dev

0至Pascal中的变量

来自分类Dev

如何检查字符串是否在Pascal中包含字符串

来自分类Dev

将字符串格式化为 Pascal Case

来自分类Dev

将字符串更改为整数 - pascal

来自分类Dev

如何使用struct转换C类型的Pascal样式字符串

来自分类Dev

从文本文件中读取字符串到Pascal中的数组

来自分类Dev

我如何访问Pascal数组中的字符串中的元素?

来自分类Dev

Delphi / Pascal / FreePascal中的MD5用于短字符串

来自分类Dev

Turbo Pascal中的左右语句是否有对齐字符串?

来自分类Dev

C中的Pascal样式字符串和C样式字符串在一个函数中进行比较

来自分类Dev

如何在Pascal中输出Set的内容?