program suma; {$APPTYPE CONSOLE} uses SysUtils; var t,s1,s2,s3:string; ost,a,i:integer; begin readln(s1); readln(s2); while length(s1)<>length(s2) do if length(s1)0 then s3:=inttostr(ost)+s3 ; writeln(s3); readln; { TODO -oUser -cConsole Main : Insert code here } end.