Напишите программу, которая проверит, сколько всего забыл Бильбо. А сделать это можно так: Если в строке есть слово забыл или то слово, что будет введено на второй строке, то строка считается.

Если таких строк с забытыми вещами не больше половины от всех введенных, то вывести НЕ ТАК И МНОГО, иначе вывести ВСЕ РАВНО НИЧЕГО СТРАШНОГО.

Формат ввода

на pascal:

program sonik;

uses crt;

var a,b,c: string;

begin

readln (a);   readln (b);   readln (c);

writeln (' фигуры: ',a,b,c);

end.

101=1*8^0+0*8^1+1*8^2=1*1+0+64=(65) в десятичной

1в=в*16^0+1*16^1=12*1+1*16=12+16=28 в десятичной

65-28=37

38 в десятичной , но такого ответа нет, значит надо перевести 37 в двоичную систему. для этого 38 делим на 2 пока делится

38/2=19 остаток0

19/2=9 остаток 1, уже видно что двоичный второй ответ не подходит, там нет нуля.

  попробуем переведем в восьмеричную, для этого делим 38 на 8.

38/8=4 остаток 6, получается 46 в  8 сс.  ответ 4 

например такие числа

954-459=495

смотри схему