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

В строку s1 занесите свои фамилию и отчество (через пробел).

В строку s2 занесите свое имя.

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

Вывести на экран исходные строки (S1 и S2), и строку s1, получившуюся после вставки.

Question

Денисыч

12 августа, 21:01

+5

Ответы (1)

Знаете ответ?

Меланя · Answer 1

Var s1, s2:String;

begin

Read (s1, s2) ;

WriteLn ('s1 '+s1) ;

WriteLn ('s2 '+s2) ;

Insert (' '+s2, s1, Pos (' ', s1)) ;

WriteLn (s1) ;

end.