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

Question

Информатика

Нилыч

9 июня, 07:57

К концу строки 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.