Что будет напечатано после выполнения фрагмента программы? Регистр учитывается.
s:='12345678900';
s1:=Copy\(s, 2, 6\);
s:=s1+'45'+s2;
Delete\(s1,2,2\);
s:=s1+'5'+s+'1';
writeln\(s\);