Function prime(n:longint):boolean;
var i,j:longint;
p:boolean;
Begin
p:=true;
if (n mod 2)=0 then p=false;
i:=3;j:=round(sqrt(n));
while (i<=j)and(p) do
Begin
if(n mod i)=0 then p=false;
inc(i,2);
end;
prime:=p;
end;
1) В 16 битной кодировке сообщение = 20*16=320 бит.
2) В 8 битной= 20*8=160.
<span>3) Если перекодирывать из 16 битной в 8 битную т 320-160=160 бит, или =20 байт
Ответ: 160 бит</span>
Будет вывод текста, который стоит в апострофах:
<span>произведение =5*5
вот если бы апостроф стоял здесь
</span><span>'произведение ='5*5
то тогда был бы вывод
</span><span>произведение =25</span>