В текстовом файле f указатель находится в начале последней строки, состоящей только из пробельных символов. Какие из перечисленных ниже функций вернут TRUE в этой ситуации?

Правильный ответ:

• # Какой раздел модуля содержит операторы, которые будут выполнены перед стартом основной программы?
• # Какие из приведенных ниже отрывков программ хорошо структурированы?1) while not eof(f) do begin inc(n); read(f,a[n]); inc(obsh_ves,a[n]); end; close(f); min:= MaxLongInt; 2) while head<>nil do begin with head^.e^ do if from^.dist+len < toward^.dist then begin toward^.dist:= from^.dist + len; enqueue(toward,queue,head); end; next_head:= head ^.next; dispose(head); head:= next_head end; 3) while left<=right do begin sred:= (left+right)div 2; if a[sred]<x then left:= sred+1 else begin right:= sred-1; inc(k); end; end; for j:= i-1 downto left do a[j+1]:= a[j]; 4) while p<>nil do begin j:=p^.v; a[j]:=k; if (head[j]<>nil) and (i<>j) then begin q:=p; while q^.next<>nil do q:=q^.next; q^.next:=head[j]; head[j]:=nil; end; p:=p^.next; end;
• # Какой стандартной функции или процедуре обработки строк эквивалентен следующий программный отрывок? {s: string; i,k,t: byte} res:= ''; t:= length(s); if i > t then i:= t+1; for j:= 1 to i-1 do res:= res + s[j]; for j:= i+k-1 to t do res:= res + s[j];
• # Сколько полей содержится в записи man? type data = record day: 1..31; month: 1..12; year: 1900.. 2100; end; man = record name: string[20]; date_birth: data; case citizen: boolean of true: (birth_place: string[20]); false: (country: string[20]; date_came: data); end;
• # Чтобы иметь возможность записывать информацию в бинарный файл, его нужно открыть при помощи команды