Сколько натуральных чисел удовлетворяет неравенству 316(8)< x < DE(16)

15

Внимание: подразумевалось, что указанное вами число 3168 это некорректно указанное число 316₈ (8 - основание исходной с/с). В ином случае решений неравенства нет.

Объяснение:

316₈ < x < DE₁₆

Переведем все числа в 10 с/с

DE₁₆ = 13 * 16 + 14 = 222₁₀

316₈ = 3*64 + 1*8 + 6 = 206₁₀

206 < x < 222

x ∈ (206, 222)

Посчитаем кол-во натуральных чисел в полученном промежутке

(222-206)-1 = 16 - 1 = 15

имя       возраст     занятие

оля         13             пение

петя         14           баскетбол

вася         13             хоккей

катя         15             танцы

коля         11         баскетбол

серёжа     11           футбол

function max (x,y : longint) : longint; begin  if x> y then max: =x else max: =y; end; var k : longint; s : string; begin  readln(s);   while (pos('.',s)< > 0)or(pos('! ',s)< > 0)or(pos('? ',s)< > 0) do

begin    k: =k+1;

    delete(s,max(max(pos('.',s),pos('! ',('? ',); end;   writeln(k); end.