8 бит - 1 байт бла бла бла бла
Алфавит 64 символа, это 2^6 (6-кол-во битов на символ)
в сообщении 32 символа - 6×32=192 бита
If (x>=-5) and (x<5) then label1.caption
(Принадлежит') else Label1.caption ('Не
принадлежит');
Х=1 Принадлежит
Const n=4;
var i,j:integer;
begin
for i:=1 to n do
begin
for j:=1 to n-i do write('-');
for j:=1 to i do write(j);
for j:=i-1 downto 1 do write(j);
for j:=1 to n-i do write('-');
writeln;
end;
end.
Результат:
<span>---1---
--121--
-12321-
1234321</span>