#include <iostream>

#include <cmath>

#include <iomanip>

bool zad1(int N)

{

   int sum = 0;

   while(N > 0)

   {

       sum += N % 10;

       N /= 10;

   }

   return sum % 2 == 0;

}

bool zad2(int N)

{

   int sum = 0, tmp = N;

   while(N > 0)

   {

       sum += N % 10;

       N /= 10;

   }

   return std::pow(tmp, 2) == std::pow(sum, 3);

}

bool zad3(int a, int b, int c)

{

   return (a == b && b != c) || (a == c && a != b);

}

int main()

{

   int N, a, b, c;

   std::cin >> N >> a >> b >> c;

   std::cout.std::ios_base::setf(std::ios_base::boolalpha);

   std::cout << zad1(N) << std::endl

             << zad2(N) << std::endl

             << zad3(a, b, c) << std::endl;

   return 0;

}

Program n_1;

var x:integer;

begin

   readln(x);

   x:=(x mod 10) + ((x div 10) mod 10) + ((x div 100) mod 10);

   if (x mod 2 = 0) then writeln('true')

   else writeln ('false');

end.

(в программе 2 таких чисел не существует)

Program n_2;

var x, y:integer;

begin

   readln(x);

   y:=x*x;

   x:=(x mod 10) + ((x div 10) mod 10) + ((x div 100) mod 10);

   x:=x*x*x;

   if (x=y) then writeln('true')

   else writeln ('false');

end.

Program n_3;

var a, b, c:integer;

begin

   read(a, b, c);

   if (a=b) or (b=c) or (a=c) then writeln('true')

   else writeln ('false');

end.