Если ввести несколько слов через пробел поисковая система найдет все страницы где есть закончи фразу

Поисковая система найдет все страницы, где есть эти слова. (Все вместе или по отдельности)

var t: integer;

begin

  read(t);

  while t > 6 do

      t: =t-6;

  case t of

      0..2: write('green');

      3: write('yellow');

      4..6: write('red');

  end;

end.

2^i = 100

i = 7 бит необходимо для кодирования любого от 1 до 100

64 * 7 =  448 бит = 56 байт