2мб,1,2мб,1230кб,3кб,3070байт
4 двоичных переменных, значит 2⁴=16 строк -полное множество возможных значений
// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadArrInteger('Введите массив', 10);
a.Where(t -> (abs(t) > 9) and (abs(t) < 100)).Println();
end.
1985 = М + 622 - М/33
(М - М/33) = 1363
32М/33 = 1363 ⇒ М ≈ 1405.6
Ответ: 1405 или 1406 год.