A=13, R=0
A=12, R=3
A=6. R=6
A=3, R=12
A=2, R=15
A=1, R=30
A=0, R=33
<span>
A=0, R=33</span>
Объясню алгоритм:
считываем слово,
если это слово имеет чётную длину
если это слово палиндром
то ответ ложь
иначе ответ истина
Правильный ответ 4.
Приведем все слагаемые к степени двойки. 2^4096+2^11-2^8.
2^4096 в двоичном представлении будет выглядеть как 1 и 4096 нулей. Прибавление к нему 2^11 добавит единицу в 12 разряд, если считать слева направо. Вычитание 2^8 даст 3 единицы, проэкспериментируйте 100000000000-100000000 = 11100000000. Итого 4 единицы.
var a:array[1..10] of integer;
s,s1:longint;
i,n:integer;
begin
n:=20;
s:=0; s1:=0;
for i:=1 to n do
begin
writeln('Vvedite element ',i);
read(a[i]);
end;
for i:=1 to n do
begin
write(a[i]:4);
end;
writeln;
for i:=1 to n do
begin
begin
if (a[i] mod 2=0) then s:=s+a[i];
end;
begin
if (a[i] mod 5=0) then s1:=s1+a[i];
end;
end;
writeln('Summa kratnix 2 = ',s);
writeln('Summa kratnix 5 = ',s1);
end.