Даны два числа: N1 и N2, и две строки: S1 и S2. Получить из этих строк новую строку, объединив N1 первых символов строки S1 и N2 последних символов строки S2 — Pascal(Паскаль)

var
   n1,n2:integer;
   s1,s2,s3:string;
begin
   writeln('Числа');
   readln(n1);
   readln(n2);
   writeln('Строки');
   readln(s1);
   readln(s2);
   s3:=copy(s1,1,n1)+copy(s2,length(s2)-n2+1,n2);
   writeln(s3);
   readln;
end.