Переводим 235 в двоичный код =11101011 здесь ровно 8 знакомест, всё отлично, продолжаем дальше!
Инвертируем: заменяем единицы нулями и наоборот. Получается 00010100, т.к. число отриц, то первый бит=1
10010100, прибавляем 1, ответ: 10010101
<span>Frac (15.6) = 0.6 - функция выделяет дробную часть
Trunc(24.9)
= 24 - функция выделяет целую часть
В результате получим 24.6
</span>
<em>// PascalABC.NET 3.2, сборка 1367 от 20.12.2016</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a,b:integer;
Write('Введите a и b: '); Read(a,b);
Writeln('П=',Range(a,b).Aggregate(BigInteger(1),(m,n)->m*n))
end.
<u>Пример</u>
Введите a и b: 13 57
П=84607064997021339293398188869165201400121387478093188300800000000000