В библиотеке книжки ))))))))))
словарь слова по алфавиту
в системе счисления с основанием 6
вес разрядов (6)(1)
тогда 40(с основанием 6) = 24 + 0
41(с основанием 6) = 24 + 1
в ответе два числа 24, 25
2) оканчивается на 101
101 = 5
1101 = 13
10101 = 21
следующее уже больше 11101 = 29
3) в троичной системе веса разрядов (9)(3)(1)
21 в троичной системе = 6+1 = 7 в десятичной
121 = 9+6+1 = 16
221 = 18+6+1= 25
следующее уже больше 25-ти
321 = 27+6+1=34
Var n,s:integer;
begin
write('n = ');
readln(n);
s:=n mod 10;
while n>10 do n:=n div 10;
s:=s+n;
writeln('s = ',s);
end.
Пример:
n = 26319
s = 11
T >= 6 - ложно, например 11
t < 9 - ложно, например 9.30
t >= 9 - ложно, например 11
t >= 10 - ложно, например 11
t < 10 - истинно
(t >= 6) и (t < 10) - ложно, например 5