. Что выводит данная программа?

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.
Вывод:

​