program deytero;
uses crt;
var
a,b,c:integer;
BEGIN
clrscr;
write('Dwse to A=');
readln(a);
write('Dwse to B=');
readln(b);
writeln('A+B=',a+b);
writeln('A-B=',a-b);
readln;
END.