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

Program p; Unit us;

Uses us; INTERFACE

Var Procedure P1(c,f: string);

S1,S2: string; IMPLEMENTATION

begin Procedure P1;

s1:=’русский ’; Begin

s2:=’язык’; c:=c+f

P1(S1,S2); ; f:=’знаем’;

Write(S1,S2): end; end.

End.

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

Program p; Unit us;

Uses us; INTERFACE

Var Procedure P1(c,f: string);

f, c: string; IMPLEMENTATION

begin Procedure P1;

P1(c,f ); begin

Write(c+f); c:=’изучаем’;

end. f:=’ Pascal’;

end; end.

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

Program N1; Unit uz;

Uses uz; INTERFACE

Var Procedure ST(c:string; var f: string);

f,c: string; IMPLEMENTATION

begin Procedure ST;

c:=’наступила’; begin

f:=’зима ’; f:=concat (f, с);

ST(c,f ); writeln(f);

Write(f); end;

end. end.

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

Program p; Unit us;

Uses us; INTERFACE

Var Procedure P1(c: byte; var f: byte);

f,c: byte; IMPLEMENTATION

begin Procedure P1;

P1(c,f); begin

Write (c,f); c:=7; f:=5;

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

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

Program SL; Unit uso;

Uses uso; Interface

Var Procedure Os (S1,S2: string);

S1,S2:string; Implementation

Begin Procedure Os;

s2:=’осень ’; begin

s1:=’наступила ’; S1:=S1+’ золотая ’;

Os (S1,S2); Write(S1,S2):

Writeln(S1,S2): end;

End. End.