四、FreePascal中的基本数据类型

　　预定义整型

　　类型　　　　　　　　范围　　　　　　　　　　长度(字节)

　　Byte　　　　　　　　0 .. 255　　　　　　　　　　　1

　　Shortint　　　　　　-128 .. 127　　　　　　　　　　　1

　　Smallint　　　　　　-32768 .. 32767　　　　　　　　　2

　　Word　　　　　　　　0 .. 65535　　　　　　　　　　 2

　　Integer　　　　either smallint, longint or int64　　　　size 2,4 or 8

　　Cardinal　　　either word, longword or qword　　　　size 2,4 or 8

　　Longint　　　　-2147483648 .. 2147483647　　　　　　　4

　　Longword　　　　　　　0..4294967295　　　　　　　　4

　　Int64　　-9223372036854775808 ..9223372036854775807　　8

　　QWord　　　　　　0 .. 18446744073709551615　　　　　8

　　支持的实型

　　类型　　　　　　范围　　　　　　　　有效宽度长度(字节)

　　Real　　　　platform dependant　　　　　　???　　　　4 or 8

　　Single　　　　1.5E-45 .. 3.4E38　　　　　　7-8　　　　　4

　　Double　　　　5.0E-324 .. 1.7E308　　　　15-16　　　　　8

　　Extended　　　　1.9E-4951 .. 1.1E4932　　　19-20　　　　10

　　Comp　　　　-2E64+1 .. 2E63-1　　　　　　19-20　　　　8

　　说明：数据类型受计算机硬件和***作系统的制约，故有些类型在你的计算机中不一定能实现

　　在初始化最小值时，要给他一个最大值;在初始化最大值时，要给他一下最小值。在FreePascal和TurboPascal中，MAXINT和MAXLONGINT分别代表最大的INTEGER和LONGINT，则最小的就分别为MAXINT-1和MAXLONGINT-1，具体是多少见上表

　　五、文件的标准***作

　　PROGRAM ONE(INPUT,OUTPUT); 在程序的头部声明标准输入输出文件变量

　　CONST INFILE='C:\IN.TXT';

　　OUTFILE='C:\OUT.TXT';

　　...

　　或者

　　VAR INFILE,OUTFILE:STRING;{通过键盘输入，且输入一定要在文件定义前，因为一旦标准输入输出文件被定义则键盘和显示器在本程序中就被文件代替了，即便关闭文件也是如此且不能在输入输出了}

　　BEGIN

　　ASSIGN(INPUT,INFILE);

　　ASSIGN(OUTPUT,OUTFILE);

　　RESET(INPUT); 打开文件准备读

　　REWRITE(OUTPUT); 打开文件准备重写，要追加写用APPEND

　　...

　　READ(?); 读一个数据

　　READLN(?); 读一行数据

　　READLN; 读换行符,这样之后才能读到下一行的数据

　　...

　　WHILE NOT EOLN(INPUT) DO BEGIN... READ(?) ... END; 一个一个的读,直到一行读完

　　WHILE NOT EOF(INPUT) DO BEGIN... END; ***作一直到文件尾

　　...

　　CLOSE(INPUT);　　关闭输入文件，则不能输入

　　CLOSE(OUTPUT);　 关闭输出文件，则不能输出

　　END.

　　说明：在完成了上述***作准备后，C:\IN.TXT文件将代替键盘做为程序的标准输入源;C:\OUT.TXT文件将代替显示器做为程序的标准输出;

编辑推荐：

历届宁波中小学计算机程序设计决赛真题汇总

备战宁波计算机程序设计比赛：快捷键一览表

宁波中小学计算机程序设计比赛常见编程语言关键字