<h3>// PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018</h3><h3>// Внимание! Если программа не работает, обновите версию!</h3>
begin
if ReadInteger('Введите x:').IsOdd then Print('Это нечетное число')
else Print('Это четное число')
end.
1.
1)1 = 3*1024*8/3072 = 8 бит объем одного символа
2) N = 2^8 = 256 символов в алфавите
2
1)Так как N=64=2^6, то I = 6 бит
2) 7200*8/6 = 9600 символов в тексте
<span>3) 9600/4/40 = 60 символов в строке </span>