Паскаль. Без помощи знака + написать код для сложения двух цифр. Спасибо.

//Pascal//Первый вариантvar a, b:integer;BEGIN  write('Введите первое число = '); readln(a);  write('Введите второе число = '); readln(b);  writeln(a-(-b));END.//---------------------------------------//Второй вариантfunction recSumBits(a, b:integer):integer;var o1, o2: integer;begin  if b = 0 then recSumBits := a  else  begin    o1 := a xor b;    o2 := (a and b) shl 1;    recSumBits := recSumBits(o1, o2);  end;end;var a, b: integer;BEGIN  write('Введите первое число = '); readln(a);  write('Введите второе число = '); readln(b);  writeln(recSumBits(a, b));  readln;END.