Напишите подпрограмму , в которой создаются две динамические переменные типа строка...

Question

Напишите подпрограмму , в которой создаются две динамические переменные типа строка символов. Созданным переменным присвойте любые значения и выведите на экран результат конкатенации соответствующих строк

Answer 1

Var
  s1,s2 : ^String;
Begin
  New(s1); New(s2);
  s1^:='str1';
  s2^:='str2';
  Writeln(s1^+s2^);
end.