Question

Помогите пожалуйста решить задачу в паскаль abc. Заранее Спасибо!

Answer 1

в чем задача? + ьаллелпгпгаорколмлпшгпшп

Answer 2

var s:string;

begin

readln (s);

writeln (s,'=',Length(s));

s:=s+'+'+s;

writeln (s,'=',Length(s));

end.