В паскале:
readln(a);
writeln("Вы ввели:",a);
Выражение будет иметь следующий вид: (2+t)*2.
Если нужно вычисление, тогда вот: t вводится с клавиатуры
Program Crt;
Var tmp,t:real;
Begin
WriteLn("Введите t= "); ReadLn(t);
tmp:= (2+t)*2;
WriteLn("Ответ: ", tmp);
readln();
end.
На один символ (букву) необходим 1 байт информации или 8 бит.
1 байт = 8 бит;
128 бит = 16 байт;
10 Мегабайт = 10485760 байт;
1024 байт = 1 Килобайт;
Оба искомых числа должны лежать в промежутке от 36 (100 в 6-ричной записи) и 215 (555 в 6-ричной записи) и давать в сумме 259 (1111 в 6-ричной записи), т.е., a+b=259 => a=259-b,
Минимальное а, для которого все эти условия выполняются, равно 44, при b=215.
Очевидно, что остальные пары выглядят так: (45, 214), (46, 213), ... (215, 44), таких пар будет 172. Поскольку пары, отличающиеся только порядком, мы считаем за одну, значит делим на 2: 172/2 = 86.
Ответ 86
* сходится с вашим ответом :)