program tri;
uses crt;
var c:char;
    v,w:longint;

begin;
clrscr;
v:=0;
w:=0;

writeln('Zadej "a+b="');
writeln;
while c<>'+'do begin
 c:=readkey;
 if ord(c) in [ord('0')..ord('9')] then begin
  v:=v*10+ord(c)-ord('0');
  write(c);
 end;
end;

write(c);

while c<>'='do begin
 c:=readkey;
 if ord(c) in [ord('0')..ord('9')] then begin
  w:=w*10+ord(c)-ord('0');
  write(c);
 end;
end;

v:=v+w;
write('=',v);
readkey;
end.