Розв'яжіть ребус до розділу " Автоматизація роботи з базою даних"

Интернет стал предметом первой необходимости. В немможно совершать покупки, общаться с друзьями, получатьобразование, работать. Возможности Интернета стали практически безграничными.

Говорят, без еды человек может прожить примерно 2 месяца (если будет пить), без воды человек погибает через 5-7 дней, а можно ли прожить без интернета??? Вы представляли когда-нибудь мир без Интернета?

Недавно, люди жили без великого творения - Интернет. Остается только удивляться: как? В последние годы, из информационного ресурса, Интернет превратился в незаменимую и очень важную часть нашей жизни. Работа, учёба, общение — всё связано с Всемирной Паутиной. Сеть перестала быть источником информации — теперь это поставщик услуг: увеселительных, образовательных.… Да любых. Чтобы скрасить одинокий вечер люди не идут в парк или кафе, они заходят в Интернет. Они ищут развлечений в электронной системе, а не среди живых людей.

Pascal:
var n,a,s:longint;
begin
  repeat
    write ('N = ');
    readln(n);
  until n in [10..99];
  write ('A = ');
  readln(a);
  s:=0;
  while n<>0 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 <iostream>
using namespace std;

int main()
{
   int a,n,s = 0;
   do
   {
      cout <<"N = ";
      cin >>n;
   }
   while (n<10 || n>99);
   cout <<"A = ";
   cin >>a;
   while (n!=0)
   {
     s+=n%10;
     n/=10;
   }
   if (s>a)
      cout <<"YES" <<endl;
   else cout <<"NO" <<endl;
   return 0;
}