Последовательность Хэмминга образуют натуральные числа, не имеющие других простых делителей, кроме 2, 3 и 5. Найти сумму первых N элементов этой последовательности. C++ (+текстовое решение)

например, это можно сделать так:

UPD: изменено

#include <iostream>

#include <set>

#include <cmath>

using namespace std;

bool prime(int n){

   for(int i = 2; i * i <= n; i++)

       if(n % i == 0)

           return false;

   return true;    

}

signed main() {

   int n;

   cin >> n;

   set<int> ok;

   ok.insert(2);

   ok.insert(3);

   ok.insert(5);

   int sum = 0, cnt = 0,cur = 2;

   while(cnt != n){

       bool norm = true;

       for(int i = 2; i * i <= cur; i++)

           if(cur % i == 0 && ( ok.find(i) == ok.end() && prime(i)) || (cur % (n/i) == 0 && ok.find(n/i) == ok.end() && prime(n/i)))

               norm = false;

       if(norm){sum += cur; cnt++;}

       cur++;

   }

   cout << sum;

}

самое близкое число, к числу 25952, которое читается одинаково слева направо и справа налево это число: 26062.

26062 - 25952 = 110 секторов проверила программа за 2 секунды

110 : 2 = 55 секторов проверяет программа за секунду

1)

var a,b,c,d: real;

begin

  read(a,b);

  c: =(a+b)/2;

  d: =2*a*b;

  if a> b then begin

    a: =d;

    b: =c;

  end;

  if a< b then begin

  a: =c;

  b: =d;

  end;

  writeln(a,' ',b);

end.

2)

var a,b: integer;

begin

  read(a,b);

  if (a< 1) or (a> 31) then writeln(' день введен неправильно');

  if (b< 1) or (b> 12) then writeln(' месяц введен неправильно');

end.

3)

var a,b,c: real;

begin

  read(a,b,c);

  if (a> b)and(a> c)then writeln(a);  

    if (b> a)and(b> c)then writeln(b);

  if (c> b)and(c> a)then writeln(c);

end.