Назначение функций для работы с файлами

1. Укажите назначение функций для работы с файлами

2. assign(f,’f1.txt’);

3. reset(f);

4. rewrite(f);

5. Eof(f);

6. Eoln(f);

7.

Найдите ошибки
в фрагменте программы

8. Var f:file of Integer; begin assign(f,’f1.txt’); reset(f,n); while not Eof(f) do readln(f,n); . . .

Var f:file of Integer;
begin
assign(f,’f1.txt’);
reset(f,n);
while not Eof(f) do
readln(f,n);
...

9. Var f:text; begin assign(f,’f1.txt’); reset(f); while Eof(f) do write(f,n); rewrite(f);

10. Var f:Text; n:char; begin assign(f,’f1.txt’); reset(f); while not Eof(f) do readln(f,n); end.

11. Var f:Text; n:char; s:string; begin assign(f,’f1.txt’); reset(f); while not Eof(f) do begin while not Eoln(f) do begin

read(f,n);
s:=n+s; end;
readln(f);
writeln(s); s:=‘’;
end;

12. Var f:Text; k:integer; s:string; begin assign(f,’f1.txt’); reset(f); while not Eof(f) do begin readln(f,s); if s[1]=‘a’ then

k:=k+1;
end;