К концу строки S1 добавить последний символ S2

Question

Информатика

Минюша

28 января, 14:26

К концу строки S1 добавить последний символ S2

+5

Ответы (1)

Знаете ответ на вопрос?

Февронья · Answer 1

Var S1, S2:string;

Begin

Write ('Введите первую строку: ') ;

ReadLn (S1) ;

Write ('Введите вторую строку: ') ;

ReadLn (S2) ;

S1:=S1+S2[Length (S2) ];

Write ('S1: ', S1) ;

End.