var
s:string;
begin
s:=Edit1.Text;
for s:=1 to length(s) do
begin
if s[i]=',' then delete(s,i,1);
ShowMessage(s);
end;
end;
Ответ: N = 2, т.к. изначально N принимает значение 2, а чтобы войти в цикл нужно чтобы N было больше 8, следовательно вход в цикл не будет осуществлен
Дано: N=256, а=15, в=32, с=64
Найти: I
I= k*i, где k- количество символов в тексте, i - количество бит на символ
N=2^i, где N- количество символов в алфавите, 256= 2^i,
отсюда i= 8
k= a*b*c= 15*32*64= 30720 символов
I=30720*8= 245760 бит = 30720 байт
2)E:\ИЗОБРАЖЕНИЯ\ФОТО\Катунь.jpeg
A) 11.13.15.17.19.21.23.25
б)22.44.66.88.100.122.144.166
в)91.81.71.61.51.41.31.21.11.1
г)1.2.4.8.16.32.64.128.256.512.1024.2048
a)37
б)20
в)42