Обозначим за N%M операцию, возвращающую остаток от целочисленного деления N на M.
Известно, что следующее логическое высказывание истинно:
НЕ (A<3 ИЛИ A>8 ИЛИ A%3<>0) ИЛИ НЕ (A<5 ИЛИ A>12 ИЛИ A%4<>0)
Найдите все значения целых положительных чисел A, при которых это возможно, и посчитайте их сумму. В ответе укажите целое число.
ответ: 29
Надо перевести сначала 21 в двоичную, потом 2 в двоичную и потом 2002 в двоичную
Получается вот так:
21 = 10101
2=10
2002 = 11111010010
В итоге:
10101.10.11111010010
дешифровки:
Const sh = '_.,';
Var
St : String;
i : Integer;
Function DeCode(S : String; Tabl : String; k : Integer) : String;
Var j,n : Integer;
Begin
For j:=1 to Length(S) do
Begin
n:=Pos(S[j],sh);
If n>0 then
Begin
n:=n+k;
While n>Length(sh) do n:=n-Length(sh);
While n<=0 do n:=n+Length(sh);
S[j]:=sh[n];
end
end;
DeCode:=S;
end;
Begin
St:='ЗЫФЙГФШРЦ . ШД';
Writeln(Decode(St,sh,-6));
//For i:=-10 to 10 do Writeln(Decode(St,sh,i));
end.