Для кодирования одного из 256 символов требуется log(2)256 = 8 бит (2^8=256); для кодирования слова, состоящего из 5 символов, необходимо 5*8 = 40 бит = 40/8 байт = 5 байт.
I=1
while i<=30:
if i % 2 == 0 and i % 3 == 0 and i%4!=0:
print(i)
i+=1
//Задача 1
var d:integer;
begin
readln(d);
if d mod 2 =0 then
Writeln('Четное')
else
Writeln('Не четное');
<span>end.
//Задача 2
var d:integer;
begin
readln(d);
if d mod 3 =0 then
Writeln('Делится') else
Writeln('Не делится');
<span>end.</span></span>