16*16=256
Получается 16 в степени 2
var
a: integer;
begin
writeln('Введите целое число');
readln(a);
if a mod 2 = 1 then writeln('Число нечетное')
else writeln('Число четное');
end.
<span>формула включений исключений
25-4 = 18 + 20 - х
х = 17</span>
А) 1
0 - положительное число;
<span>1 - отрицательное число</span>