дано двузначное число. определить больше ли числа A сумма его цифр.

Pascal:
var n,a,s:longint;
begin
  repeat
    write (N = );
    readln(n);
  until n in [10..99];
  write (A = );
  readln(a);
  s:=0;
  while n0 do
    begin
       s:=s+n mod 10;
       n:=n div 10;
    end;
  if s>a then writeln (YES) else writeln (NO);
  readln;
end.

C++:
#include
using namespace std;

int main()
{
   int a,n,s = 0;
   do
   {
      cout       cin >>n;
   }
   while (n99);
   cout    cin >>a;
   while (n!=0)
   {
     s+=n%10;
     n/=10;
   }
   if (s>a)
      cout    else cout    return 0;
}