#include <iostream>
using namespace std;
int sum( int n ){
int k = 0;
int t = n;
while ( t > 0 )
{
if ( ( t % 10 ) % 2 == 0 )
k++;
t /= 10;
}
return k;
}
int main()
{
int M,S,p;
cin >> M;
S = 0;
for ( int i = 1; i < M; i++ ){
p = sum(i);
if ( p == 0 ) {
S = S + i;
}
}
cout << S;
return 0;
}
Тема какая?.................
Var a,b, d:integer;
begin
read (d);
a:=d div 100;
b:=d div 10 mod 10;
if a>b then Write ('перша більша') else Write ('друга більша')
end.