К числу 9 применили в некотором порядке три операции: умножили на 3, разделили на 3 и прибавили 3. Какое наибольшее число могло при этом получиться?

Объяснение:

я считаю что 18

9-3)/3)*3

Результат сложения: 0110101011010010011101101000

Получили число 0110101011010010011101101000. В десятичном представлении это число имеет вид:

Для перевода необходимо умножить разряд числа на соответствующую ему степень разряда.

0110101011010010011101101000 = 227*0 + 226*1 + 225*1 + 224*0 + 223*1 + 222*0 + 221*1 + 220*0 + 219*1 + 218*1 + 217*0 + 216*1 + 215*0 + 214*0 + 213*1 + 212*0 + 211*0 + 210*1 + 29*1 + 28*1 + 27*0 + 26*1 + 25*1 + 24*0 + 23*1 + 22*0 + 21*0 + 20*0 = 0 + 67108864 + 33554432 + 0 + 8388608 + 0 + 2097152 + 0 + 524288 + 262144 + 0 + 65536 + 0 + 0 + 8192 + 0 + 0 + 1024 + 512 + 256 + 0 + 64 + 32 + 0 + 8 + 0 + 0 + 0 = 112011112

Результат сложения (в десятичном представлении): 112011112

В Паскале есть стандартная функция Pos, которая возвращает начальную позицию вхождения подстроки в строку или 0, если такое вхождение не обнаружено. С её данная задача решается очень просто.

var
  s:string;
  ip,iv:integer;
begin
  Write('Введите строку: '); Readln(s);
  ip:=Pos('П',s); iv:=Pos('В',s);
  if ip*iv=0 then Writeln('П или В или обе не найдены в тексте')
  else
    if ip<iv then Writeln('П встретилось раньше В')
    else Writeln('В встретилось раньше П')
end.

Тестовое решение:
Введите строку: НА ЛУГУ ПАСЕТСЯ КОРОВА
П встретилось раньше В