Question

программы с процедурой вставки

В строку s1 занесите свои фамилию и отчество (через пробел).
В строку s2 занесите свое имя.
С помощью процедуры вставки измените строку s1 таким образом, чтобы она содержала Ваши фамилию, имя, отчество.
Вывести на экран исходные строки (S1 и S2) , и строку s1, получившуюся после вставки.

Answer 1

var s1,s2:String;
begin
Read(s1,s2);
WriteLn('s1 '+s1);
WriteLn('s2 '+s2);
Insert(' '+s2,s1,Pos(' ',s1));
WriteLn(s1);
end.