Составить программу для целого двузначного числа а найти сумму и частное его цифр

я пробовала у меня вышло 15 но возможны и другие варианты

моя улица в солнечной системе. это земля. она находится третьей от солнца. 

var a,b,c: integer;

begin

  read(a,b,c);

  if a> =0 then writeln(a);

  if b> =0 then writeln(b);

  if c> =0 then writeln(c);

end.

var a,b,c: real;

begin

  read(a,b,c);

  if (a> b) and (b> c) then begin

      a: =a*2;

      b: =b*2;

      c: =c*2;

  end

  else begin

      a: =-a;

      b: =-b;

      c: =-c;

  end;

  writeln(a,b,c);

end.