Вот программа, она находит наименьшее число до 99
508,03=5*10^2+0*10^1+8*10^0+0*10^-1+3*10^-2
1101,001=1*2^3+1*2^2+0*2^1+1*2^0+0*2^-1+0*2^-2+1*2^-3
C=12 E=14 D=13 A=10 значит
CE,DA=12*16^1+14*16^0+13*16^-1+10*16^-2
<em>// PascalABC.NET 3.2, сборка 1439 от 09.05.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
Writeln(Range(2,2*ReadInteger('n='),2).Aggregate(BigInteger(1),(m,n)->m*n))
end.
<u>Пример</u>
n= 37
1891675820705153808241239602722999673157373132800000000