Turbo Pascal怎么读
read是直接读入,例如read(a)就是读入a。
readln是读入一行,楼上对这个函数的解释有点问题,他把readln理解成了c语言中的scanf("%d\n",&a)了。readln(a)表示读入a,并且舍弃下个回车符号之前的所有字符,把文件指针直接移动到下一个回车符之后的位置,与你是否输入回车符没有关系。
举个例子:
输入1 2 3 4 (回车) 5 6 7 8 (回车)
调用readln(a,b),再调用readln(c,d),则得到的结果为a=1,b=2,c=5,d=6。
['tə:bəu 'pæskəl]
是一种计算机编程语言
至于怎么读入数据呢,常用的有两种:
1.键盘读入
read和readln
样例1:
program duru;
var
n:longint;
begin
read(n);
end.
样例2:
program duru;
var
n:longint;
begin
readln(n);
end。
其中样例2的读入有回车符,就是如果你用的是readln的话,当你按回车之后,这一行后面的数据都不读入,转到下一行继续读入;而read则是读完目标数据就结束。
2.文件读入
要用到assign和reset
样例:
program duru;
var
n:longint;
begin
assign(input,'e:\');reset(input);{引号中为所要读入的文件路径}
{下同键盘读入,根据所需要使用read或readln}
end.
没可能
rewrite是覆盖 重写的意思,用了rewrite就把所有内容覆盖了
append是追加内容,只能在后面添加。
所以,唯一可行的方法是:把所有内容读入,储存,计算,然后把所有的内容(包括修改了的数据)再次输出(用rewrite)
比如:
var
a:array[1..6]of longint;
i:integer;
begin
assign(input,'d:\a.txt');reset(input);
for i:=1 to 6 do readln(a[i]);
a:=a+1;//假设需要修改第二个数
cloes(input);
assign(output,'d.\a.txt');rewrite(output);
for i:=1 to 6 do writeln(a[i]);
close(output);
end.
一句话,没法直接在文档里面改内容
其实我不是很明白你的意思……查找吧 用你定义的变量当做关键字
['tə:bəu 'pæskəl](偷油博 怕死口)
tiu bou pa si kou
标签:Turbo,Pascal