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

}