Что отобразит фрагмент этой программы, Pascal Опции

[Vino-grad]

S := 'ABCDEF';
T := 'rinda';
Insert(T, S, 3);
T := Copy(T, 3,1);
Write (S, ' ', T);

и еще один фрагментик другой программы:

Var a,b,d:string; c: integer;
Begin
a:= 'pascal';
b:='stunda';
c:=pos(b,a);
d:=copy(b,3,2);
insert(d,a,1);
delete(b,1,4)
write(a,b,c,d);
end.