дано двузначное число. определить больше ли числа 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 <<"N = ";

cin >>n;

}

while (n99) ;

cout <<"A = ";

cin >>a;

while (n!=0)

{

s+=n%10;

n/=10;

}

if (s>a)

cout <<"YES" <
else cout <<"NO" <
return 0;

}