. Что выводит данная программа?
Program P81;
type Nume = string[8];
Prenume = string;
NumePrenume = string[5];
var N:Nume;
P:Prenume;
NP:NumePrenume;
L:integer;
begin
N:='Martinov';
L:=length(N);
writeln(N,L);
P:='Iurii';
L:=length(P);
writeln(P,L);
NP:=N+' '+P;
writeln(NP);
end.
Вывод:
Martinov8
Iurii5
Marti