5.63. После выполнения программы на экран будет выведено …

Program Prim; Unit u1;

Uses u1; INTERFACE

Var Procedure P1(c,a:byte);

a,c: byte; IMPLEMENTATION

begin Procedure P1;

P1(c,a); begin

Write (c,a); inc(c,25); dec(a,2);

end. Write (c,a) end; end.

5.64. После выполнения программы на экран будет выведено …

Program P; Unit u_S;

Uses u_S; Interface

Var Function F1(a:real):real;

f,а:real; Function F2(a:real)::real);

begin Implementation

a:=f1(a); Function F1(a:real):real;

f:=f2(a); begin

write(‘a=’,a:5:1) ; F1:=4+sqr(a);

write(‘ f=’,f:5:1) ;. end;

end. Function F2(a:real):real;

begin

F2:=fF1(a); end; end.

6. Ошибки, возникающие при компиляции модулей

6.65. Компиляция модуля завершается с ошибкой:

Unit mod1;

Interface;

Procedure R(f : real);

Implementation;

Procedure R;

Begin

f:=SQR(f);

end;

end.

6.66. Компиляция модуля завершается с ошибкой:

Unit us;

INTERFACE

Procedure MS (m,n: real);

IMPLEMENTATION

Procedure MS;

begin

c:=7; m:=m+n

end; end.

- Unknown identifier

- Duplicate identifier

- Identifier expected

- “ ; ” expected

6.67. Компиляция модуля завершается с ошибкой:

Unit U_O;

INTERFACE

Pocedure PR (m,n: real);

IMPLEMENTATION

Procedure MS;

begin

m:=sqr (m); n:=m;

end; end.

+ Unknown identifier

- “ ; ” expected

- Identifier expected

- Duplicate identifier

6.68. Компиляция модуля завершается с ошибкой:

Unit m;

INTERFACE

Procedure PRO (m,n: byte);

IMPLEMENTATION

Procedure PRO;

begin

m:=sqr(m); inc(n);

End;

+ Unexpected end of file

- “ ; ” expected

- implementation expected

- Duplicate identifier

6.69. Компиляция модуля завершается с ошибкой:

Unit m1;

INTERFACE

begin

Procedure PRO (m,n: real);

Procedure PRO;

begin

m:=sqr (m); inc(n);

end; end.

- implementation expected

- Unknown identifier

- Identifier expected

- Duplicate identifier

6.70. Компиляция модуля завершается с ошибкой: Uses s;

Interface

Procedure p (s:real);

Implementation

Procedure p;

Begin

n:=n+1;

s:=s+n;

end; end.

+ Unknown identifier

- Duplicate identifier

- Identifier expected

- Unexpected end of file

6.71. Компиляция программы завершается с ошибкой:

Program CH; Unit ch;

Uses ch; INTERFACE

Var n,a: real; Procedure P1(n:real);

begin IMPLEMENTATION

a:=20; Procedure P1;

n:=2.8; begin

P1(a); n:=n+1;

writeln(a,n) end;

end. end.

- Duplicate identifier (ch)

- Identifier expected

- “ ; ” expected

- Type mismatch